(* Content-type: application/vnd.wolfram.mathematica *)

(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)

(* CreatedBy='Mathematica 8.0' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       157,          7]
NotebookDataLength[    208038,       4056]
NotebookOptionsPosition[    206264,       3992]
NotebookOutlinePosition[    206622,       4008]
CellTagsIndexPosition[    206579,       4005]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{

Cell[CellGroupData[{
Cell[BoxData[
 RowBox[{"Ham", "=", 
  RowBox[{
   RowBox[{
    RowBox[{"A", "/", "2"}], 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        RowBox[{"7", "/", "4"}], ",", 
        RowBox[{"2", "^", 
         RowBox[{"(", 
          RowBox[{"1", "/", "2"}], ")"}]}]}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"2", "^", 
         RowBox[{"(", 
          RowBox[{"1", "/", "2"}], ")"}]}], ",", 
        RowBox[{"11", "/", "4"}]}], "}"}]}], "}"}]}], "-", 
   RowBox[{"\[Mu]e", " ", "B", " ", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        RowBox[{
         RowBox[{"-", "1"}], "/", "2"}], ",", "0"}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"0", ",", 
        RowBox[{"1", "/", "2"}]}], "}"}]}], "}"}]}], "-", 
   RowBox[{"\[Mu]n", " ", "B", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{"1", ",", "0"}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"0", ",", "0"}], "}"}]}], "}"}]}]}]}]], "Input",
 CellChangeTimes->{{3.521144422839369*^9, 3.5211445167747507`*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
     RowBox[{
      FractionBox[
       RowBox[{"7", " ", "A"}], "8"], "+", 
      FractionBox[
       RowBox[{"B", " ", "\[Mu]e"}], "2"], "-", 
      RowBox[{"B", " ", "\[Mu]n"}]}], ",", 
     FractionBox["A", 
      SqrtBox["2"]]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     FractionBox["A", 
      SqrtBox["2"]], ",", 
     RowBox[{
      FractionBox[
       RowBox[{"11", " ", "A"}], "8"], "-", 
      FractionBox[
       RowBox[{"B", " ", "\[Mu]e"}], "2"]}]}], "}"}]}], "}"}]], "Output",
 CellChangeTimes->{3.521144545314185*^9, 3.521474967872787*^9, 
  3.5214790785684013`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Eigensystem", "[", "Ham", "]"}]], "Input",
 CellChangeTimes->{{3.521144549828895*^9, 3.521144555713402*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
     RowBox[{
      FractionBox["1", "8"], " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"9", " ", "A"}], "-", 
        RowBox[{"4", " ", "B", " ", "\[Mu]n"}], "-", 
        RowBox[{"2", " ", 
         SqrtBox[
          RowBox[{
           RowBox[{"9", " ", 
            SuperscriptBox["A", "2"]}], "-", 
           RowBox[{"4", " ", "A", " ", "B", " ", "\[Mu]e"}], "+", 
           RowBox[{"4", " ", 
            SuperscriptBox["B", "2"], " ", 
            SuperscriptBox["\[Mu]e", "2"]}], "+", 
           RowBox[{"4", " ", "A", " ", "B", " ", "\[Mu]n"}], "-", 
           RowBox[{"8", " ", 
            SuperscriptBox["B", "2"], " ", "\[Mu]e", " ", "\[Mu]n"}], "+", 
           RowBox[{"4", " ", 
            SuperscriptBox["B", "2"], " ", 
            SuperscriptBox["\[Mu]n", "2"]}]}]]}]}], ")"}]}], ",", 
     RowBox[{
      FractionBox["1", "8"], " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"9", " ", "A"}], "-", 
        RowBox[{"4", " ", "B", " ", "\[Mu]n"}], "+", 
        RowBox[{"2", " ", 
         SqrtBox[
          RowBox[{
           RowBox[{"9", " ", 
            SuperscriptBox["A", "2"]}], "-", 
           RowBox[{"4", " ", "A", " ", "B", " ", "\[Mu]e"}], "+", 
           RowBox[{"4", " ", 
            SuperscriptBox["B", "2"], " ", 
            SuperscriptBox["\[Mu]e", "2"]}], "+", 
           RowBox[{"4", " ", "A", " ", "B", " ", "\[Mu]n"}], "-", 
           RowBox[{"8", " ", 
            SuperscriptBox["B", "2"], " ", "\[Mu]e", " ", "\[Mu]n"}], "+", 
           RowBox[{"4", " ", 
            SuperscriptBox["B", "2"], " ", 
            SuperscriptBox["\[Mu]n", "2"]}]}]]}]}], ")"}]}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{"-", 
        FractionBox[
         RowBox[{"A", "-", 
          RowBox[{"2", " ", "B", " ", "\[Mu]e"}], "+", 
          RowBox[{"2", " ", "B", " ", "\[Mu]n"}], "+", 
          SqrtBox[
           RowBox[{
            RowBox[{"9", " ", 
             SuperscriptBox["A", "2"]}], "-", 
            RowBox[{"4", " ", "A", " ", "B", " ", "\[Mu]e"}], "+", 
            RowBox[{"4", " ", 
             SuperscriptBox["B", "2"], " ", 
             SuperscriptBox["\[Mu]e", "2"]}], "+", 
            RowBox[{"4", " ", "A", " ", "B", " ", "\[Mu]n"}], "-", 
            RowBox[{"8", " ", 
             SuperscriptBox["B", "2"], " ", "\[Mu]e", " ", "\[Mu]n"}], "+", 
            RowBox[{"4", " ", 
             SuperscriptBox["B", "2"], " ", 
             SuperscriptBox["\[Mu]n", "2"]}]}]]}], 
         RowBox[{"2", " ", 
          SqrtBox["2"], " ", "A"}]]}], ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"-", 
        FractionBox[
         RowBox[{"A", "-", 
          RowBox[{"2", " ", "B", " ", "\[Mu]e"}], "+", 
          RowBox[{"2", " ", "B", " ", "\[Mu]n"}], "-", 
          SqrtBox[
           RowBox[{
            RowBox[{"9", " ", 
             SuperscriptBox["A", "2"]}], "-", 
            RowBox[{"4", " ", "A", " ", "B", " ", "\[Mu]e"}], "+", 
            RowBox[{"4", " ", 
             SuperscriptBox["B", "2"], " ", 
             SuperscriptBox["\[Mu]e", "2"]}], "+", 
            RowBox[{"4", " ", "A", " ", "B", " ", "\[Mu]n"}], "-", 
            RowBox[{"8", " ", 
             SuperscriptBox["B", "2"], " ", "\[Mu]e", " ", "\[Mu]n"}], "+", 
            RowBox[{"4", " ", 
             SuperscriptBox["B", "2"], " ", 
             SuperscriptBox["\[Mu]n", "2"]}]}]]}], 
         RowBox[{"2", " ", 
          SqrtBox["2"], " ", "A"}]]}], ",", "1"}], "}"}]}], "}"}]}], 
  "}"}]], "Output",
 CellChangeTimes->{3.521144556183921*^9, 3.521474968101386*^9, 
  3.5214790787830353`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Ham1", "=", 
  RowBox[{
   RowBox[{
    RowBox[{"A", "/", "2"}], 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        RowBox[{"11", "/", "4"}], ",", 
        RowBox[{"2", "^", 
         RowBox[{"(", 
          RowBox[{"1", "/", "2"}], ")"}]}]}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"2", "^", 
         RowBox[{"(", 
          RowBox[{"1", "/", "2"}], ")"}]}], ",", 
        RowBox[{"7", "/", "4"}]}], "}"}]}], "}"}]}], "-", 
   RowBox[{"\[Mu]e", " ", "B", " ", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        RowBox[{
         RowBox[{"-", "1"}], "/", "2"}], ",", "0"}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"0", ",", 
        RowBox[{"1", "/", "2"}]}], "}"}]}], "}"}]}], "-", 
   RowBox[{"\[Mu]n", " ", "B", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{"0", ",", "0"}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"0", ",", 
        RowBox[{"-", "1"}]}], "}"}]}], "}"}]}]}]}]], "Input",
 CellChangeTimes->{{3.521293816551507*^9, 3.521293834752798*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
     RowBox[{
      FractionBox[
       RowBox[{"11", " ", "A"}], "8"], "+", 
      FractionBox[
       RowBox[{"B", " ", "\[Mu]e"}], "2"]}], ",", 
     FractionBox["A", 
      SqrtBox["2"]]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     FractionBox["A", 
      SqrtBox["2"]], ",", 
     RowBox[{
      FractionBox[
       RowBox[{"7", " ", "A"}], "8"], "-", 
      FractionBox[
       RowBox[{"B", " ", "\[Mu]e"}], "2"], "+", 
      RowBox[{"B", " ", "\[Mu]n"}]}]}], "}"}]}], "}"}]], "Output",
 CellChangeTimes->{3.521293838147056*^9, 3.521474968143341*^9, 
  3.521479078839192*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Eigensystem", "[", "Ham1", "]"}]], "Input",
 CellChangeTimes->{{3.521293840947229*^9, 3.521293847894273*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
     RowBox[{
      FractionBox["1", "8"], " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"9", " ", "A"}], "+", 
        RowBox[{"4", " ", "B", " ", "\[Mu]n"}], "-", 
        RowBox[{"2", " ", 
         SqrtBox[
          RowBox[{
           RowBox[{"9", " ", 
            SuperscriptBox["A", "2"]}], "+", 
           RowBox[{"4", " ", "A", " ", "B", " ", "\[Mu]e"}], "+", 
           RowBox[{"4", " ", 
            SuperscriptBox["B", "2"], " ", 
            SuperscriptBox["\[Mu]e", "2"]}], "-", 
           RowBox[{"4", " ", "A", " ", "B", " ", "\[Mu]n"}], "-", 
           RowBox[{"8", " ", 
            SuperscriptBox["B", "2"], " ", "\[Mu]e", " ", "\[Mu]n"}], "+", 
           RowBox[{"4", " ", 
            SuperscriptBox["B", "2"], " ", 
            SuperscriptBox["\[Mu]n", "2"]}]}]]}]}], ")"}]}], ",", 
     RowBox[{
      FractionBox["1", "8"], " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"9", " ", "A"}], "+", 
        RowBox[{"4", " ", "B", " ", "\[Mu]n"}], "+", 
        RowBox[{"2", " ", 
         SqrtBox[
          RowBox[{
           RowBox[{"9", " ", 
            SuperscriptBox["A", "2"]}], "+", 
           RowBox[{"4", " ", "A", " ", "B", " ", "\[Mu]e"}], "+", 
           RowBox[{"4", " ", 
            SuperscriptBox["B", "2"], " ", 
            SuperscriptBox["\[Mu]e", "2"]}], "-", 
           RowBox[{"4", " ", "A", " ", "B", " ", "\[Mu]n"}], "-", 
           RowBox[{"8", " ", 
            SuperscriptBox["B", "2"], " ", "\[Mu]e", " ", "\[Mu]n"}], "+", 
           RowBox[{"4", " ", 
            SuperscriptBox["B", "2"], " ", 
            SuperscriptBox["\[Mu]n", "2"]}]}]]}]}], ")"}]}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       FractionBox[
        RowBox[{"A", "+", 
         RowBox[{"2", " ", "B", " ", "\[Mu]e"}], "-", 
         RowBox[{"2", " ", "B", " ", "\[Mu]n"}], "-", 
         SqrtBox[
          RowBox[{
           RowBox[{"9", " ", 
            SuperscriptBox["A", "2"]}], "+", 
           RowBox[{"4", " ", "A", " ", "B", " ", "\[Mu]e"}], "+", 
           RowBox[{"4", " ", 
            SuperscriptBox["B", "2"], " ", 
            SuperscriptBox["\[Mu]e", "2"]}], "-", 
           RowBox[{"4", " ", "A", " ", "B", " ", "\[Mu]n"}], "-", 
           RowBox[{"8", " ", 
            SuperscriptBox["B", "2"], " ", "\[Mu]e", " ", "\[Mu]n"}], "+", 
           RowBox[{"4", " ", 
            SuperscriptBox["B", "2"], " ", 
            SuperscriptBox["\[Mu]n", "2"]}]}]]}], 
        RowBox[{"2", " ", 
         SqrtBox["2"], " ", "A"}]], ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{
       FractionBox[
        RowBox[{"A", "+", 
         RowBox[{"2", " ", "B", " ", "\[Mu]e"}], "-", 
         RowBox[{"2", " ", "B", " ", "\[Mu]n"}], "+", 
         SqrtBox[
          RowBox[{
           RowBox[{"9", " ", 
            SuperscriptBox["A", "2"]}], "+", 
           RowBox[{"4", " ", "A", " ", "B", " ", "\[Mu]e"}], "+", 
           RowBox[{"4", " ", 
            SuperscriptBox["B", "2"], " ", 
            SuperscriptBox["\[Mu]e", "2"]}], "-", 
           RowBox[{"4", " ", "A", " ", "B", " ", "\[Mu]n"}], "-", 
           RowBox[{"8", " ", 
            SuperscriptBox["B", "2"], " ", "\[Mu]e", " ", "\[Mu]n"}], "+", 
           RowBox[{"4", " ", 
            SuperscriptBox["B", "2"], " ", 
            SuperscriptBox["\[Mu]n", "2"]}]}]]}], 
        RowBox[{"2", " ", 
         SqrtBox["2"], " ", "A"}]], ",", "1"}], "}"}]}], "}"}]}], 
  "}"}]], "Output",
 CellChangeTimes->{3.521293848472724*^9, 3.5214749682140903`*^9, 
  3.52147907890839*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"cond", "=", 
  RowBox[{"{", 
   RowBox[{
    RowBox[{"A", "\[Rule]", 
     RowBox[{"228", "/", "1.5"}]}], ",", 
    RowBox[{"\[Mu]e", "\[Rule]", "1.4"}], ",", 
    RowBox[{"\[Mu]n", "\[Rule]", "0.001"}]}], "}"}]}]], "Input",
 CellChangeTimes->{{3.521293923333302*^9, 3.521293979681355*^9}, {
  3.521294147259081*^9, 3.521294147979073*^9}, {3.521403881223901*^9, 
  3.5214038905264463`*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"A", "\[Rule]", "152.`"}], ",", 
   RowBox[{"\[Mu]e", "\[Rule]", "1.4`"}], ",", 
   RowBox[{"\[Mu]n", "\[Rule]", "0.001`"}]}], "}"}]], "Output",
 CellChangeTimes->{3.5212939810708103`*^9, 3.5212941493448153`*^9, 
  3.521403895706164*^9, 3.521474968248214*^9, 3.521479078955614*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"spec", "=", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
     RowBox[{
      RowBox[{
       RowBox[{"A", "/", "8"}], "*", "15"}], "-", 
      RowBox[{"\[Mu]e", " ", 
       RowBox[{"B", " ", "/", "2"}]}], "-", 
      RowBox[{"\[Mu]n", " ", "B"}]}], ",", 
     RowBox[{
      FractionBox["1", "8"], " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"9", " ", "A"}], "-", 
        RowBox[{"4", " ", "B", " ", "\[Mu]n"}], "-", 
        RowBox[{"2", " ", 
         SqrtBox[
          RowBox[{
           RowBox[{"9", " ", 
            SuperscriptBox["A", "2"]}], "-", 
           RowBox[{"4", " ", "A", " ", "B", " ", "\[Mu]e"}], "+", 
           RowBox[{"4", " ", 
            SuperscriptBox["B", "2"], " ", 
            SuperscriptBox["\[Mu]e", "2"]}], "+", 
           RowBox[{"4", " ", "A", " ", "B", " ", "\[Mu]n"}], "-", 
           RowBox[{"8", " ", 
            SuperscriptBox["B", "2"], " ", "\[Mu]e", " ", "\[Mu]n"}], "+", 
           RowBox[{"4", " ", 
            SuperscriptBox["B", "2"], " ", 
            SuperscriptBox["\[Mu]n", "2"]}]}]]}]}], ")"}]}], ",", 
     RowBox[{
      FractionBox["1", "8"], " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"9", " ", "A"}], "-", 
        RowBox[{"4", " ", "B", " ", "\[Mu]n"}], "+", 
        RowBox[{"2", " ", 
         SqrtBox[
          RowBox[{
           RowBox[{"9", " ", 
            SuperscriptBox["A", "2"]}], "-", 
           RowBox[{"4", " ", "A", " ", "B", " ", "\[Mu]e"}], "+", 
           RowBox[{"4", " ", 
            SuperscriptBox["B", "2"], " ", 
            SuperscriptBox["\[Mu]e", "2"]}], "+", 
           RowBox[{"4", " ", "A", " ", "B", " ", "\[Mu]n"}], "-", 
           RowBox[{"8", " ", 
            SuperscriptBox["B", "2"], " ", "\[Mu]e", " ", "\[Mu]n"}], "+", 
           RowBox[{"4", " ", 
            SuperscriptBox["B", "2"], " ", 
            SuperscriptBox["\[Mu]n", "2"]}]}]]}]}], ")"}]}], ",", 
     RowBox[{
      FractionBox["1", "8"], " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"9", " ", "A"}], "+", 
        RowBox[{"4", " ", "B", " ", "\[Mu]n"}], "-", 
        RowBox[{"2", " ", 
         SqrtBox[
          RowBox[{
           RowBox[{"9", " ", 
            SuperscriptBox["A", "2"]}], "+", 
           RowBox[{"4", " ", "A", " ", "B", " ", "\[Mu]e"}], "+", 
           RowBox[{"4", " ", 
            SuperscriptBox["B", "2"], " ", 
            SuperscriptBox["\[Mu]e", "2"]}], "-", 
           RowBox[{"4", " ", "A", " ", "B", " ", "\[Mu]n"}], "-", 
           RowBox[{"8", " ", 
            SuperscriptBox["B", "2"], " ", "\[Mu]e", " ", "\[Mu]n"}], "+", 
           RowBox[{"4", " ", 
            SuperscriptBox["B", "2"], " ", 
            SuperscriptBox["\[Mu]n", "2"]}]}]]}]}], ")"}]}], ",", 
     RowBox[{
      FractionBox["1", "8"], " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"9", " ", "A"}], "+", 
        RowBox[{"4", " ", "B", " ", "\[Mu]n"}], "+", 
        RowBox[{"2", " ", 
         SqrtBox[
          RowBox[{
           RowBox[{"9", " ", 
            SuperscriptBox["A", "2"]}], "+", 
           RowBox[{"4", " ", "A", " ", "B", " ", "\[Mu]e"}], "+", 
           RowBox[{"4", " ", 
            SuperscriptBox["B", "2"], " ", 
            SuperscriptBox["\[Mu]e", "2"]}], "-", 
           RowBox[{"4", " ", "A", " ", "B", " ", "\[Mu]n"}], "-", 
           RowBox[{"8", " ", 
            SuperscriptBox["B", "2"], " ", "\[Mu]e", " ", "\[Mu]n"}], "+", 
           RowBox[{"4", " ", 
            SuperscriptBox["B", "2"], " ", 
            SuperscriptBox["\[Mu]n", "2"]}]}]]}]}], ")"}]}], ",", 
     "\[IndentingNewLine]", 
     RowBox[{
      RowBox[{
       RowBox[{"A", "/", "8"}], "*", "15"}], "+", 
      RowBox[{"\[Mu]e", " ", 
       RowBox[{"B", " ", "/", "2"}]}], "+", 
      RowBox[{"\[Mu]n", " ", "B"}]}]}], "}"}], "-", 
   RowBox[{"A", " ", 
    RowBox[{"3", "/", "8"}]}]}]}]], "Input",
 CellChangeTimes->{{3.5212939942107058`*^9, 3.521294076001062*^9}, {
  3.521403903557781*^9, 3.521403909965097*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{
    FractionBox[
     RowBox[{"3", " ", "A"}], "2"], "-", 
    FractionBox[
     RowBox[{"B", " ", "\[Mu]e"}], "2"], "-", 
    RowBox[{"B", " ", "\[Mu]n"}]}], ",", 
   RowBox[{
    RowBox[{"-", 
     FractionBox[
      RowBox[{"3", " ", "A"}], "8"]}], "+", 
    RowBox[{
     FractionBox["1", "8"], " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"9", " ", "A"}], "-", 
       RowBox[{"4", " ", "B", " ", "\[Mu]n"}], "-", 
       RowBox[{"2", " ", 
        SqrtBox[
         RowBox[{
          RowBox[{"9", " ", 
           SuperscriptBox["A", "2"]}], "-", 
          RowBox[{"4", " ", "A", " ", "B", " ", "\[Mu]e"}], "+", 
          RowBox[{"4", " ", 
           SuperscriptBox["B", "2"], " ", 
           SuperscriptBox["\[Mu]e", "2"]}], "+", 
          RowBox[{"4", " ", "A", " ", "B", " ", "\[Mu]n"}], "-", 
          RowBox[{"8", " ", 
           SuperscriptBox["B", "2"], " ", "\[Mu]e", " ", "\[Mu]n"}], "+", 
          RowBox[{"4", " ", 
           SuperscriptBox["B", "2"], " ", 
           SuperscriptBox["\[Mu]n", "2"]}]}]]}]}], ")"}]}]}], ",", 
   RowBox[{
    RowBox[{"-", 
     FractionBox[
      RowBox[{"3", " ", "A"}], "8"]}], "+", 
    RowBox[{
     FractionBox["1", "8"], " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"9", " ", "A"}], "-", 
       RowBox[{"4", " ", "B", " ", "\[Mu]n"}], "+", 
       RowBox[{"2", " ", 
        SqrtBox[
         RowBox[{
          RowBox[{"9", " ", 
           SuperscriptBox["A", "2"]}], "-", 
          RowBox[{"4", " ", "A", " ", "B", " ", "\[Mu]e"}], "+", 
          RowBox[{"4", " ", 
           SuperscriptBox["B", "2"], " ", 
           SuperscriptBox["\[Mu]e", "2"]}], "+", 
          RowBox[{"4", " ", "A", " ", "B", " ", "\[Mu]n"}], "-", 
          RowBox[{"8", " ", 
           SuperscriptBox["B", "2"], " ", "\[Mu]e", " ", "\[Mu]n"}], "+", 
          RowBox[{"4", " ", 
           SuperscriptBox["B", "2"], " ", 
           SuperscriptBox["\[Mu]n", "2"]}]}]]}]}], ")"}]}]}], ",", 
   RowBox[{
    RowBox[{"-", 
     FractionBox[
      RowBox[{"3", " ", "A"}], "8"]}], "+", 
    RowBox[{
     FractionBox["1", "8"], " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"9", " ", "A"}], "+", 
       RowBox[{"4", " ", "B", " ", "\[Mu]n"}], "-", 
       RowBox[{"2", " ", 
        SqrtBox[
         RowBox[{
          RowBox[{"9", " ", 
           SuperscriptBox["A", "2"]}], "+", 
          RowBox[{"4", " ", "A", " ", "B", " ", "\[Mu]e"}], "+", 
          RowBox[{"4", " ", 
           SuperscriptBox["B", "2"], " ", 
           SuperscriptBox["\[Mu]e", "2"]}], "-", 
          RowBox[{"4", " ", "A", " ", "B", " ", "\[Mu]n"}], "-", 
          RowBox[{"8", " ", 
           SuperscriptBox["B", "2"], " ", "\[Mu]e", " ", "\[Mu]n"}], "+", 
          RowBox[{"4", " ", 
           SuperscriptBox["B", "2"], " ", 
           SuperscriptBox["\[Mu]n", "2"]}]}]]}]}], ")"}]}]}], ",", 
   RowBox[{
    RowBox[{"-", 
     FractionBox[
      RowBox[{"3", " ", "A"}], "8"]}], "+", 
    RowBox[{
     FractionBox["1", "8"], " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"9", " ", "A"}], "+", 
       RowBox[{"4", " ", "B", " ", "\[Mu]n"}], "+", 
       RowBox[{"2", " ", 
        SqrtBox[
         RowBox[{
          RowBox[{"9", " ", 
           SuperscriptBox["A", "2"]}], "+", 
          RowBox[{"4", " ", "A", " ", "B", " ", "\[Mu]e"}], "+", 
          RowBox[{"4", " ", 
           SuperscriptBox["B", "2"], " ", 
           SuperscriptBox["\[Mu]e", "2"]}], "-", 
          RowBox[{"4", " ", "A", " ", "B", " ", "\[Mu]n"}], "-", 
          RowBox[{"8", " ", 
           SuperscriptBox["B", "2"], " ", "\[Mu]e", " ", "\[Mu]n"}], "+", 
          RowBox[{"4", " ", 
           SuperscriptBox["B", "2"], " ", 
           SuperscriptBox["\[Mu]n", "2"]}]}]]}]}], ")"}]}]}], ",", 
   RowBox[{
    FractionBox[
     RowBox[{"3", " ", "A"}], "2"], "+", 
    FractionBox[
     RowBox[{"B", " ", "\[Mu]e"}], "2"], "+", 
    RowBox[{"B", " ", "\[Mu]n"}]}]}], "}"}]], "Output",
 CellChangeTimes->{
  3.521294078887003*^9, {3.521403898901989*^9, 3.521403911018022*^9}, 
   3.5214749682964697`*^9, 3.521479079007626*^9}]
}, Open  ]],

Cell[BoxData[
 RowBox[{"graph", "=", 
  RowBox[{"Plot", "[", 
   RowBox[{
    RowBox[{"spec", "/.", "cond"}], ",", 
    RowBox[{"{", 
     RowBox[{"B", ",", "0", ",", "1000"}], "}"}], ",", 
    RowBox[{"AxesLabel", "\[Rule]", 
     RowBox[{"{", 
      RowBox[{
      "\"\<B(G)\>\"", ",", 
       "\"\<E/\!\(\*SubscriptBox[\(\[Mu]\), \(B\)]\)h(MHz)\>\""}], "}"}]}], 
    ",", 
    RowBox[{"LabelStyle", "\[Rule]", 
     RowBox[{"Directive", "[", 
      RowBox[{"Bold", ",", "Larger"}], "]"}]}], ",", " ", 
    RowBox[{"Ticks", "\[Rule]", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{
        "0", ",", "200", ",", "400", ",", "600", ",", "800", ",", "1000"}], 
        "}"}], ",", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", "600"}], ",", 
         RowBox[{"-", "400"}], ",", 
         RowBox[{"-", "200"}], ",", "0", ",", "200", ",", "400", ",", "600", 
         ",", "800"}], "}"}]}], "}"}]}], ",", 
    RowBox[{"AxesStyle", "\[Rule]", 
     RowBox[{"Arrowheads", "[", "Automatic", "]"}]}]}], "]"}]}]], "Input",
 CellChangeTimes->{{3.5212940829841433`*^9, 3.5212941087799063`*^9}, {
   3.521403918400605*^9, 3.5214039270807657`*^9}, {3.521404005827388*^9, 
   3.521404058465354*^9}, {3.521404096988833*^9, 3.5214042035252657`*^9}, {
   3.521404277521385*^9, 3.52140428039878*^9}, {3.521474986917012*^9, 
   3.521475150907597*^9}, {3.5214758615523243`*^9, 3.5214758631055098`*^9}, {
   3.52147622060927*^9, 3.521476245893302*^9}, {3.521476401858127*^9, 
   3.521476416861678*^9}, 3.52147905738027*^9, {3.521479998187742*^9, 
   3.521480044369582*^9}, {3.521480081921537*^9, 3.521480122235845*^9}, {
   3.521480176198657*^9, 3.521480179510723*^9}, {3.5214802319658623`*^9, 
   3.521480256019957*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"newGraph", "=", 
  GraphicsBox[{{{}, {}, 
     {Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJwVkHk41HkcxydHJYXR8ThKx6RNiGewu9qGjxqUDCVNkXuYyTSOmSFz/SoN
455fh9AhM4Sytdndkrtv5aHDLtqnUhpPsko1I0wUyqz94/28/ny9nvfamKSg
OD0CgUCb2//8OP7N34c54ZGeqhvQHeMAr1LoQlX+46nvNXTZRsgBgbGGaakc
9Mxc/JhF4XFA3FpFMFBqPXMqijSiWA58L5bSphT6cKbHcWpiBwdaDca1WsVS
uOwYZqYmcsDmFzvfMQUJHgzVe/RWHIaAZ22jnxQuYELnXajtYAOckhp7p1Bh
iDw2u//DISBq6bWnGAGQSxDHKx1Y4NEk2IOZBYMoIY54NS0OFPzW668OhMDN
ZwcZ1aUM6N+pejLjEwFNzuHNvoPRELdLpInpioYlWew7/fpR4NX4xaArMRb2
T9XqWKFhYFw/QLAeYIJ9e7mcrj4A9mO+iVuz4+Fs3jUu2XUfbGmwQhQ9DhSR
O2OCmvbAjZ2Rtu1JiRDpHFqqqvaHlkVms8ScZEDqXavGqN5gVV/VV3ufCyW9
T3iWd7fCOukMt9GCD9YpfZPGCnuIIBudzmKlgIxKs+ExPt4h2tEut5Wlgtp0
8mGIuSNKogQmccaPQMr9iuHsSAqinstyyNgsAG/JdAj7ojdqMz9aPj9TCFW2
/GK3VTSUluxY7v9UBB+v3PwkpQQh5fKlhXqmEohXnTO0u74PpfXWeZAYGNAt
WR2vmSGo7c3Jvj8VR6GSbyMOHghD1B6S3sLeY1Dru+ilrW0Uqk9sTB4sPA7e
IcLOmtlolGNx9IWInA7GItXtgnoGcu5RXPJVpYPsktuUsDgOjc6UbZzMOAF1
JMfv1QksxPFr/DVsrXTuB8tpl/XxqKXaJe/rIymQd0/7P9Sx0aONDxj+8Rkg
+dJV0tzEQWPW7vNOGGTCMR21eiwxEWlWGc2or2XCecPnhiWkZFS5/bPG1E8G
pktlrm91yYgs8KAc+iyD8HVOJg0jXCTursgUnMmCHQ1B/zb+xUOq80On2U7Z
kEdovxB+hY+Wp8i+nerNhqs7XWYzzqYgI+62SO6RHIiysg7v46WiJ5JwG9na
XNCqvzHrYo6gW9PB5ZKHufA6aXMQOSAN7b3IWm3PzIM40Ut3lZ0Adfi/+Gpi
lg8dsuOdiy2EaHIN83HNb/lw10p58PCkEHmyumI2+hXAikhiJ7tbhCKai+l9
4wXgXSl+N9IsRj+7ibf7nJSDCT9KpzwnQc/E2zYZnpGD4+iGNHGpBKXeMyK2
nZUDLUEzEqyUoD8CS/q9LsghlyXqX3BVghzYt4SUKjkYhBW2JNRL0JqyTzdc
m+UwQ30gdn8uQUZGsStJw3IYXuH8tXsZhq4E2uu/+SCH+YWTSTUWGPIpGn+v
0MjBltjyTroSQxmk9Ns2WjnEGvs9/3E9hmYpl4KsZuXwWseou+iCoXFebzZx
GQ5Ph4tTDgVh6GRDWVL3Chy0cRFqLzqGnAgsOm6Jg/ng+ljrUAxxCiZIS1bj
EKj6fe/f0Rh6W21+Z+EmHB71PCa7cud8Iy8qOxxweB9wumZJKoZIbsp8mRMO
CzoPrHsnwFDUPadQAzccfNqHiOePz/Us/AL3f8KBsf1aDj8DQ6WBrT+c2IKD
FPHm0bIxtLUo08SLgoOS4i7ckI+hl6/8J3SeOKBG3agOx9B/t7lYjQ==
       "]], 
      LineBox[CompressedData["
1:eJwVl2k41N0fh4coS9mX+UmMNZUQbTwxH2XfSUIRytZmEtmZyS4xRZQWo4VW
j0qlEqfSos1SpCzPRHu2ZCuV//xfnOucz3Xf33PO9825rqMRFOERLEyj0XoE
4//zt5HfTjYhYxaCpV/k15cWkWfiTKzKXjJpMo2+CqZXmLGSAyFUWR+TVlIe
ob34HjOhrpwmUvaDSasTk41WbGX+KU51/smbAbaGvMOsj++YdSIjP37w5AHd
Yw1ZGd+Zav8ssP3O0wKIbd3bBhrOW/y+PWmuDXZqZ3OIhRCWr24yonVqA2Vt
JxbdEIKLfbSKtKIusGfLAv9yYSSvvzugn60HhJeb+CeIoHu3T2HYrsWgpbzS
TZ+eBZf2huEhngn4ytrOG3ZKIeU/Px+pcRMglS8X1S6Fqs/jd/UdlwIq/JJi
c2nITukVhI8thVHv4mfJIjJ4pb5/WZ/9csissv8774kMfMPXxbePrARXVkFl
noUc9kUO9o7ammJYWnHG9q1yqE3IdJQ/bgoo7rprXiSHeXk3Vd1szcAfiJ4f
3i8H/pV59Y1H/wGDVru/86A8Qn9/mHHHygJctVunpB8r4LBoyvbOIxbgVcdM
xfcr4LEUve3noAUY/Q2TITKKWKjhUL78CBPDDwqCiZciJjTXa3fsAZrrZp6L
7lYEt+KUd2gZUKWT9rT3jyL09Idzx58CvANzyprmKcF7WfaYgoYlmn/d+TF/
oxJu2d5+6P7UEow2zaXNrUrweDZrij9mCfa+qs8rhpTwzc3TkMVYDXaYQqya
pDJUfQeK86JXg/efzf1QS2UkbVcPf6q+BsSpOuRzhTKUvm877uuwBgxRHwcr
oozK6JqWL1FrYDTrtaNahzJ6kt3NxJ6sAbdNy8NpJh04kCppHWWFYTHlBXkb
6XjUo2QhfMwK5KdOaloEHS7651n1963A3VOmIL6XDr9HzW2m8tZgHFY6VXuG
jvcKW8QmzKwh8yAz9dt1OrYHTZhVB1mD/PUMOvuIjvg/83gGV6zB16r98PQT
HUKOl1u/vbEG72Y+y3iCjqzDVqLnhGzAUjJ5qDuTQrHJtq1a7jbgvTI4WaNJ
oTq8Zil9WJDVI3tTvCj8c8MxtE3ZFnyH5xlrgyjcE/nvyEGmLWTajpdW76DQ
Uio6PTvfFm7CGhLqqRS8Bw4veXJd4GvGOOjtp8A309+S2WML9GZ31RVRGGzz
aBQysIPbBfnXBWcpRGt9nKpbZ4fmKtElrVUUfrPiDBKT7BCQeb7+eA2FtLrZ
gaZn7MAaOZU4Xk9BcjavYPyZHapMhgK7HlI46GPy8OqoHYY1P4S7PqegUvFw
kqVqDyNrs3zXlxTKRn0WGVjZg/bu77OuDgp6qwf8vm2zB0O+VG2im8K/+Wzu
2QJ7yPB7U070UljeLX8/+LY9eNaD/a0fKdQtrBjT7BP4DpZBhV8pWMea6fEl
HOAmUdPVO0Dh2YPnvseNHdD8IMenbpiCp3zgfl9fBwx/dW7X/UGhM2C0Xnmv
A7jqI26qYxSCKjNHXp1zAM2h4dGJcQpfplR0DrYIePEO08oJCiz7yvWuPwX1
nB+nHSYpTBZZ5szWcARe3hCPEuSU969qG+0c4XY2NnShIM80DhvKYDmCv8ut
boegPi9lSsPqsCMYo9ekLAT7Kz7P8xQiAm6V6HN0lMIxFc3Muk8C/ri1NH2E
glbYtZsJ0k4IWGTd93uIwvlrdv0rVziBu+m2jpCgP+MZXWrj/k5gHIgLP/iF
wk23CPerGU4wUmdcrvpAASeE01iVTmjmXpje8I7C42+Hri9ud4JbdpR3YRcF
V9MFX77+cQL7lmG9z2sK7Rm1c8/qOIPRPrDiYgsF/1euLsHOzkDS3Ef7nlL4
oNHH1ox2RrMBZ9dkA4XRWvGPxxqcYZT3Tj/uOoUEieN0335ncDtX2O+vpCDs
beSorOAi6C+p2KCcguwPr6oDm13A0Ex4Ty+koOan4ZmZ4wIikvKqIIeC/qNv
E4mXBX62dyaPTcHuKJsZNi3g/F9rI7ZR8BJ17PPTdQW//FnSkgAKmyMUM9c6
u4J3Oz0n3ZNC8przLyyOuoIr6s3q+4dC7qWoyKX3BP5LpY0DBhSOKDOVFn5x
BaNzllu2BoW3Y18qc+a6gSj5x8WIUhhvTB6PDndDs4KwsMFjOv783fx4ONEN
RpImfo036BBZal+yjesGhvBVlYlyOmRPyFsE3nAD+9KDIfE0OvQjz6Y7ibqD
GzwrXsqUjs0qrQpaZe7g2xi0l+YpY6vrjY/Hq92BMzN/h8Yog5V2rIb+2B2k
hBl9f5MykgdDNkoNucOIPXR2qaEySu5Nnfq5ygNVZWJ04UYlNG/VMWnu8AAO
Ks33/ayI16USoo79HuC1nI4JeKKInldD7Q+mPUDbUeM7dUER/Ra34m/rrsVw
ZILx0A5FzJJ3vVcetRYBa2sqWwTvucXtWPckGU+Q0BWTRe3yYLR+eXFCxxMB
nOvclkp5CH3xdSJmAv5ikpufIY8GJXPbGcGecGuL8ShaKg+HSCHz7JueaG4q
vtyaIwevBTl6h4LWgbtg5LkuQxYrMXXmesw68D9uu392WAbU+u1aHbnrEFBS
waoiMuhKc1Gbe2MdjN6GHnTfJIMgvpxCmaQX2Kbvn9QtlkZE8dHpi9VeYPwx
bD3aIwm3ytlJLxq9wK/Ym5PEkoTxg6RfQz1eoD3R/R0hJInxkU1jxuLrwa/W
2Z3FkECii/a3Gr/14P2KKj+wVgxZopfaG2Z6I6Bz53mv/SLg7a671OXtA5qF
8uiZ05PMn4MeCw9tF2QH+ZpK3gTTY+uncme2D9iqImOLjo4zRQJleHUVPkD1
peyMfaPMMJegg7xxHxAVMZkmn2Gm0YKZMVsKfUHbyLFRvdbDrO9xRn/TBtCM
57zIKvpQT/ftrT3dtwHsU890z/39VM9q22PqNyHgVitjr4Z/rdd8Vmr8Qm0j
2EfTtdh2Q/UZN79rV+3YCKgu0QorHK13KTwkHiXpB9I14Jty8299j31365SN
PzCv5No9MQkiV/Hnl+9Gf7BjXkcYP5YgNiJqWrd2+SMg/OXUzixJcqnOf3fs
MX/wVOYUOEnOIYkmfPmx7/7gm2pOW8+RIdS8Ps/BY5vgJnW3xstQniyMjdrG
igtA1UVzLeE7FAl2jB8IagrE5yqpJy6TWoRh2XGc/yYQK6vtCj8Za5Ou5ctd
/N8HgjYkOvf8Dm3ioTlS6fMzEKzB5k8X+rQJfoaz3LSCkBVz0aq0RYeoVvj8
MI8JAmtzu+eia/PJS2HTn3T1zVhZfL17dskiYnlrQqRp5xaE6Zc93PB1CZGs
eUeb+y4E7GdGKq5OZmTRd9udq7LCsSUkrOOP5mpidlOFmAtvR7PnDdl0TVvy
r/0mnYcRO/F+SxjbzsmJ3JGQ+SubzYLSHotRZzl3olJT3ll1fxd+C428575f
SzRTp3bdou+G6kxLDyvx9cTfWPxgZmgUtNff9eEt8SWyC5xPN5RGozcrTddq
iR+JMHeN2D6yB92n/mpbMQOI1ZFM/TSDWFzQV7/c8iKQNMgln5yZHgfhxk91
SWmbSQxr8Umntngops165bI8mJQpyhcKSyciQDV3gfGLEBLTcd1Ca3MSIg65
fIrcF0YaermdV3nJ2E29qy5fvJVYtWgJi3Wk4PQb6eHLjdtIzc5brL5CNope
SxreydlBsunJb+KNObBjeBxNNIwgRi28E7bdHFzK7LYvSGSR4alSvfG0vUiT
Xyr9y28X2e5w68JGjVScK5cebDKKJHcqTPZNPklFyLKekxJKu8kTvcebncLT
UFR4bmFG/27yfa6p0F6RdORN5Pouq48iA/PEp/ovpmPukmXVlqejyZk1owPS
Dhm40mBeuy5+DzGOtTAPG81AYUHXnkdBMSSh+VR6bEEmeJOrl+uuiiXdJR8O
bjXMgqf9oetZsnFEMSrj94GOLERuJd02P+OI+K7Vm3btycbe3AluU0s8aU30
U8vQyEHH89wz12oTyLVfnicTG3Nw4Wmfff6pRLL2WKj6opB9+HXk2jd6QhJ5
5PRmUkomF4d17RRpwclknBHy9HxlLpLbBp/kMFMIM7QpSM9hP0be/zsxIcEm
/rXFXp0j+xHcU1Tvk8ImK5clrLHh5uGB8MoGkX42aU9YvVC0IA+O3pc1vw6w
SfQ9cdmGQ3mI9Qzb2zTEJldcD/dYHhVk/n7rkh9sor/1Wpx5eR4GL1x6azjF
JozSoX+X1uZBX/An2SDBIeLiW1S1PufhouSq0St6HHLWddGM3q95KPp6N+7w
Qg6xKRr5whvIwz/n42nJ+hySpsW5ofYjDxoJqbL2Rhzy1/yEh8rfPPxa9sXy
vxUcMhLZkSWrkA9PsdpOSVsO4d4sjWhWysc2Yhf13Y5DDGmhXvlUPsq1Z0i9
duCQ7fvHtOao5yPl7LTVSRcO+VghVy+2MB+Dp6XurvQSnDf45swj/XzkNEwH
qXlziNaystwMw3wsF1KdKeLLIQH3DH1FluUjLPeVa5Of4D5iE7i/QuCvZI1X
b+KQ46518/ea5WO8dtmJkkAOWVWULmVpno+7j7Vt2Zs55G2X09g0Mx8akubf
g4M55H8d9U/S
       "]], LineBox[CompressedData["
1:eJwV1nc4V+0fB3BZoSEjicr4Vo+k7DLCm2T72rNsKZ2Db/be40uipImMjPIr
GspMJRmlyINUUtFTWSUhHut3nj/Oda7Xdd3Xde7zuT+f93VLuPtZHmVlYWH5
SD3/vcemFk30vGY0p16vzKzEkPAvCVPULfxb612NiuODKBKhaya8NhcOaynJ
htz2iyAR0VjKwl74W0up6LrKWDCJpYsJpvMFbPi6l/aRw5dEI/vU798FAijF
kfrnR0hsU9+l/6uAhubWgb25B0iUay7Wz2lsR1aMW8Q9NRL7dDrlWN5vx1ze
3JeXKiTohkEivBt3wpVBCq5VJhFt92RCJlUKXIkxqyv2kPgQ4JB9/OQeXGHd
bZkqRq3va578WaAILoX4lhIOEjEfnRzWzyriuKp4OSs7idvfZ5/IGCthi9J9
dw9WEnwLUue8Z5SQsX+XvdwKgR6x08rDhvswBzJsbo6Ao7dNeN+UChruKj/Q
mSBwyv/H0LS+KvquFSV9GCPQEJFiLJCniroGT83IUQJbM2q3mOurYQPzKuPZ
NwKf7m591J6jjhp1zCUPETi2+A/bQ11N7BNQOd3aT+ASRwz5/rImssVkwwrf
EGhbL9w7/0MTXyrmXWL6CEhLGJXuu6wFBeklCf0eAn8k7bb3BwPFwfezOLsI
nCm7Zn+sEAhPtGWwdBKQkplMn30BSCm4mC+/JGCvnDojKKGNxQJFUc4OAnX6
9S0WL7Th6sw+faiNgGXH6oVPM9poGBFccmklMGZuLcsQ18HQUzpvdAuBLY4T
FzOCdKAr6WLZ0kwgihTzfiF2EII5m46nPCEg9IvIczQ6CFffys4njwlUBNW8
Hgk8iCMh9noslAejLdS4nh8EJ9sZj9RGAjibsOZQoC6KTG/6ddQTaB0U0mTN
1cUX6RZ5Bcp0mXLGo6e6aLm2PT6njoBTa1evqsAhGBQndYbWEghf2lqw9+4h
rH2xeZdzNYFVxne6x94ewvaEW96fHhBgXtLluLFKD+wPR9W9KF9UJE7QLPRQ
zPx4IfI+gSrvGiXhST2QT5Lleu4RUK82Pta7SR/9B+hcAZSb2D9eztLSh/k6
/8CNlF/nc6yszdRHcN4Uz9G7VD0nLsk/f6APFe13yvyUP6nJeKYM6oOdRWm2
6Q6BH72W7av2GsDksJKKLOUg2teFRhsDfBczqxu9TWCREbY3MsoAi6bN3Tco
JzaudVMtMcCJNy1xJOU1awvOzXYYQKo7uVWBcpaDYsu9aQMEh8gXL1YSEClr
mWNsMYQM7dem55SldCacxghDmJQaPfOjXJkZe+b6OUNUDEiv6FPe90Hg6dF6
Qxj03eyiUW6ULpuRHDbEeNa4KhvlQ6FqUp94jHBXnk39awWBjmcvHfMUjHB1
krOng7K1gNtpR0cjHJBZw1FN+b3r9KNN8UZwdRF/VUzZvSJlqueGEXokrWUv
UB5ZENmR9doIcnvuSJ2izDCssDObN0KxpVZdAuW5C9ppayWMMZTI9iWGcsyX
noZ2A2Ow/r1S8p85FY7/TGYYI9JbkeW/9RkxCxK6l4whl3VlKpXyxpcZ1qse
GyOwam9UNuVcEcmUxm/GELf5ml9EmXb8fm0Erwm6hO47VlEuv28wrrLfBLO1
p261U1ZgG9g262wCua32l4Yo15r7WdxLNgFTg0N0hTKusiYyKkzQvC9CWYyq
T9vY+Qd7+kzQdjD/mw5lM9VdI6NLJuB8ZCV/gnJfcoPo9R2mmJQM5T9P2bnH
jH7U1BSxPCNpTyn/IzEcKxlkigb52CszlEm/4Hsfc01hHSyovZs63+kG7q+5
zaag94dFe1KO4MkTdhw3xc3wOMtCyqz2csabBOmQKp5v+EyZ77ft7bMedHQ5
e1n7UP21zUnCOiWNDk/JC8sPKMu0jv2JvEPHF5VKEXaqPw1yYrWOr9ARO3aj
7DplWw7jYaedZpjTWiPMQvW3h9/GFCtTMyw62Mw7Uo4+WP5KM8cMy+nJ60Sr
CKTfCvRXajKDUli/Vizly5u0hKRHzFD89/fP3ym/mxmpSBM1h8i3pYBmar5m
26Nng7zN0WUR2lJMzefSskfbZKQ5mm/SfXbUEGBXMrxCnDFHTSZ/3A3KfFcF
NN2qzVHxqH2inppvGf/rSSYcFsg+sL+Lu4GAYtlpu1ZhC+o8XnaXUFYb8N+l
I2MBmagBzUMPqf/T03i534pavyrKIoPKFw+RbkFaoQV6RHotDal8OmFW/TWv
ygJparbnWJqofkzMrRFuswDT5oBqPeXoH15H1v+0QEXO8l01Kt+uNC1cmz9g
CQOnQ3R3Kg+7TuxQ7Oq3xHo2kxyrVwTe5PNwGI9boiEgZBRU3g72/Ox7tmKJ
9Nr15+WpPB7XrAuv32mFCq/b81u6CawWMGsqDbSCOU/GuCiV55r1oRZRG6wx
t/NJZ+0gAfHukVdXd1iDne2c3sxHKs9GHE0eq1kj8NnOIqXPBJqFNPTZjlpj
OliP7dEwASP/VRqptdZIe15MZx2hznNXmtR5dxtkXGXw6EwTUMFCyYMQG0SW
OOrVzxDYbEfS+tNt0JCbbK3yh8BAIn2baLUNGLrFQxr/UvP7iV+wcI0tWg55
FAWzkPC7mLNys8oWaQ+n0/LWkTCvWBv1qt0WNfo3zKx4SSg8i/r356AteNJD
X6/lIzE75TKjwG0HQbU2zlOCJCLp28dqnOzgZW65oUqUBJPjVl8zpz2qeH/Z
V0uTKAhovDVg7wCjUV6JUGMS8z8spc+TDmiRtEqNMiVheeJbqWmsA6pOFnMl
m5Fgd9tQ0FjmgIoYPv0CKxLH6e5ZBbMOkDstnzd/mITcLs4Qz2xHOH5OidD0
IfFo0BTjnYcRriIjuzqLhLDjUEPx8GHESpm3k9kkGL3Bqk5/DqOqmTTtvUBC
siNf4dW2I1AKqFhXmUMiufbX9ts+RyDOv6ybVELdJ7LPcweucYLOhlbt+loS
g4Yfuhf0nIHSK6M6X0jwly3963jEGWSj0oTGNxJ67NtodSed8W/XRtqBURK3
Gp0DQnOdYbDUI64zSdVH8ZPAzC9nPD6qtydwkcTmrcPWP3JdkOaf2+W70QfS
oYEEI8wVrxJYj9029MFR4/AJ9043CL27VTNT5wNx7f68T2/dMCXddj630QcD
+/bRnb+4QbeyfL1ekw8sJacqHObdwHzs2VHQ7gPMezPMae6oUl+nG9Tvgy1l
Dr81QtxR7PKMeWnWB3+zqs4Li3nAyKfxer2SL7Tr/rB3+npCSfO0+4YaX6yp
+cwi+tkLekasoRVP/bD7l77vAaY36H/KN4nGMaBWK/JYg7pHhW97/KZO/CQq
DV12tPj5Yq2eYvW1ZyfxkGfDMl8qA0WSZ7vtYv0hUlP6/vbTk4hra2a7pBQA
yYSFk3XCAUjP+nDGZykAzgrcWSnHAsFKKn3Y2xoIvl2mxc35QRgMTPncmhwE
Pw0zP3IqGNv+0lNpcgiG7uUUmcS9oTA4OsSvIhGCZv7oIs6kMNj83kA8WAhB
CGNPkUlvOCY7cj8a9ISicKNANitvJFzTOdVH88MQ0v9Ak+YRBXq8aYpidDia
h868v1cQjanpvyQX6RHQfU1j5eqPwYB2/Nq7WyJR41vHGM6ORXNAnPLnxUik
Cke/DVeIg67Oa/XJV1GQe11wVf9DHATLJ5t97kVjciFfajYxHs5Dw5XR2TEg
jer+d0QiAVc6EjTiFWPxsEzx1NzzBAwa+MpMl8TiuVSbh4l3Iua/yxzn5ovD
L1HVVfHsSeD1NtdVDY/DxFbuhfGbSYgNuW+VPR6HkoPTE7xGyTjrW7A12C4e
CqGaGsenk2FfquyS8CIeEV3XkkLPpaDTM5GTRyUBH678k3VClgmFP4WO54oS
sDEwefFsPxNvBU+J6wslgvukjsvJ4FRc/NHJ6xGfiO5Ip23JEmngXJCkl/9J
xP1/rYsi29Pw/Gml+PiJJFjlHhPb7XUKxG2zXmZfElpN3s6t35AOiMmOmxsn
Y1bc60V5RTreOPre9KlJhtaxTncpo9PQu0gwQmkpcG64aPt+6jTYgoO5Ki+m
QEU54qDemQwYq599LM/ORF+EjjTHuQwM79tMCHEyEdTEzdd8PgPb3w4KLaxm
4q7ZpUHtnAwY3JHwb17DhMyJ+2EapRng2Ri5306ACfH8n5VKDRkYVNu/FCnJ
BDe35xba9wykc57wbwcT1812sw2NZoB5avlghQ4TehemRgomMqD165nQOV0m
Emlx1dt+U/tZP/7oiAETyxpXLUWWM+Drli4+acbElH8/k08wE66ePSKbXJg4
U5vv1yWUidQmv5UFVyZkWY7ZZm7ORH+Hyj+f3JkgT8/Q1ollojfXsqrci4mv
ZfyPuKQzcUY+11XTl/rej7clrTKZ0PyTQ6cxmKApF6Yny2Zi+W2LBpc/E65N
so7sypmwvZMr1h1E7YfrD57uz0Qamz5/dQgTeWaNf8WrZYJrryhnbhgTBy4k
rdfWyMS3j8ILsRFMvBswmVnRyoRDm9avo1FM/B+301ap
       "]], 
      LineBox[CompressedData["
1:eJwVjnk41AkcxidsmXpypkjubOQqR0mGb7kZaVGPECFXWeO+r/EzrphJRCkZ
SrYS1qbcvo7dUo+7lRIJeVqbmJEjNNb+8T7v5/3r8yp40uy9+UgkksNm/u9/
uetUc59Fo03sDpkZbAkpi9YxLRk0JvkBf+HpmtaoHbM+UiWTxqTMnjlN1/bW
2Jb7JIGSBWMSQ+pARuhA648CwvY7mx+S6pVRo3SitUWAu7DAFockTtWtbh63
Vfa4qgWHrQQgoWCnWsuPp4Y65+fYOgBdFUGLEhKY+OH8OaElHRAR1sk0iZfA
6s9Lbeo2utDnXz3DmZJA0TWVXP/Fzd1axwis3Y2v5bL1Jq2OwCH+RItxZ0l0
9j8TM8TVB9L3WVHaM2n0Xf/E32xqBMinQWtzVkDIIXaYhZlCncxYL2dEBUUX
zlbneJ0Cfa+NLmUTXTRqjPolXsQRnLoiVRqGDJEd2vL4vdM5kB8wQLc4Exyz
Gh1YM3eDcaHzlt3pluhtEzPr2esB76eSZBOsT+GJhmWB3sCLkLnWxP2+2x53
1H0kSX/0gXtqTxjuXxxRjWMRaJjuD01DJc/UxJ3QoH4vUvgCAENTpU12uWCV
lbvyX7RAUPS/vPpKzA2bt4vwRDOCoILec9ig6gLurbs/Ut0RDIXxf14poXii
IrEW3CAZCuR3ny1XOF7opk2+luYbBjKNDkWUUm8UVbW911kcDit2G65++r5I
o9jRArgREMcd7+xf8EPTm2nqKZpRsOExs0U07xJ2iiWUbmVEA5hNaXmcC8DI
II1S6t8x0H3awiFGMhBLJMTz+ITjYIKd13a4kYaRw0+NlLzigW1xQ8q9LQg7
J66O/MFOgErx7Kma/GA07VfiExxOBH4vGZq3XwjWBTYETeYlgYT91vlQaihm
SCa8jdGmAzX78vU2hTA81M++YzFKh3KayKg/ORzn14pVllKSgb1/8LHFbDgG
WDc8clUggLNaYareHoHN5TpXVl4S8FLOrMPnQSS+VHnhRfVPAc0cXimTHoUc
6WNbkgUYELWWd73uTDTOypDXvlQwYOK05uARwxgsM/k2K2ydCvmCI6F08VjU
jjKi+H1LBZ/wmmOKP2Ixtu8uIyo3DXT4tmQkvonD0cJP1y5ppUNfAb2w43E8
SoSlrucMp4Nnou1+t/wEJAefdA+OyID84D1jxbREHIg7L5uqkAkVS/XbijSS
sHbVsTSuKxNSHZSnnUqS0OG2r5yazxVYZR16476Tjs+pb1eERLJAs8woKzeZ
jkvyPq8eVmaBmaLNSaF5Ohr79nqqWGfDmcGZDJpLMro1FZwd4WaDa2XZcV5v
MurrxZqYX2UC58O0Ro8hgUOxJw/+lMuEtrtzPz8xIjC8nSzaeZ0JEf2j8oVA
YI3djbETt5hwm+G/x8eUQPVLtdGU+0yIFdMX5tkQKF88V6XbxITL5CRVTRcC
yeSL+5Q+MyEw7/A2VjSBv9mp8U/MMEFSPGZfeCyB5vncf9izTGheZmu7xBOY
okR/JrvABKs9GR4H6ATyKHfs9/KYEPZ7U1drOoHckOF00V0soBbRO+YLCLxa
X0zr282CyY/500M3CdQi+Z5lSbHghXLa9uZbBAZkLyrtlGOB7utlx4xiAqfL
xVoFD7Lg0Rfxbwrlm76vb8ueq7PgGHVNRvABgUp6JVmpWixw5jVafn1I4IV2
LWcBPRYYMV6wGyo3/wguQ8dRFtybE+9hVxNYZNdyINmABeNvjq6n1hBomM8Q
OkFhwbygrtqvTwh89566uGHMgjFbQReHpwT+BxQqjsk=
       "]], 
      LineBox[CompressedData["
1:eJwVkHk01AkAxyfH5loMW5soWdmI2HW0HYav2LFE1pkOR2SkhnHf55zmh5mh
1lHJjDOdFh0UHRSpiDbPEVaeXpeVEWpZu/aP7/u+73uf977f99ULYniEyJBI
JM8V/e/vpUsuVNqcDdWUpETKpCO6KsnCQfLcVt0ntdCFSUei8hRNSzJh2zlk
qHGWTUdKazVJTjJra0oL6rXn0/FPEcv1i1gW9RMejtcL6GiVk87OijXx8bV7
t0E1HRt3GznOiPUhKqUpG/TQsa+//eO02AKvKroTfjUKR8aY3wHVeQvIjExK
8kzCUfdm/p7JXkt0dVt2PzULB3nR8GTYnCX8dSsM9m8Pxx+6eVYTTtuxJ3yk
OM8+HAfDvJP7pTuQqcMf5PmHI3RpUrbFwQYyH86qVBaGA/ks5Z9jHSAdVrBW
VYsAedanLj94H7Ibr5X6KDFgcyvRPU3dC8nKD/0bVSMhjmm9/NL3AMZdc/SM
f4/EqNNI3yLVHwtMoyZFzyiE7E2eCuo5gnVVj/yKlKNh17wg1xNxFKL6vtWH
O6OhfHOcpD1Og0CqWiSfHgPjGccI6+wwmOY456v9EotdTevvUmToUA/zza9W
iMNVpwCDh4wIDIlj9xd3xqFFSX2ZzI9E862QtoEz8Vh/s3q4ri0Kj+MPLh4O
TsB3rMWo5nUxIOlsOT9GSYS/uWIBLzQWPh2Tq33XJoFs5FrZXhYHH+8Sn5bx
JDAobgy6NB6qlbW3O+8kw6GEZ8I2TYRKUDl1pygF7Rrp5V9xkvBE01tlZ0wq
EiK3lbu8SAazVKlR2zMNkjWap2TUUoE+fnPH5nQkDFy30Q9Og5K6VH5SIQPt
r0TDDeJ0xF58oUOMZsChV19GYSADS1z3bVTfTNyMaI6cOJUJ1RD52sSuTPDX
pQ8mm2eh8LLkuaNVFn7oFZ9zHMmCuHq5zrE2Cx8Xywzn2UxMXMjnHtFmgu7c
fPGwHguW7KHhRQ4TLTUWOZ+7WGg+UsFt/8JEl2FnsEsYG2+NapZJNBZmtHeu
YspxECu620B5xsLUBsXFD5c4yHBamq6xZ6PK/tOUmjMXmp9PJMddZcM80YZy
7BMXBqPkpKjNHKQ8q+AknuThdPGGwc58DkZOTxYcN8tGYNLbpxr/cLAmlruU
P5AN8p8pgTlRXChG7QmIiucjTnSjxmuUi75Uv41cPQIFQX65rl48XPvbqzz1
EQFRXOhxy04ePM+G6hrTcpB76VZCsGU2OlwGP6uq52JXScOF+7XZmN9Ee3zh
Si62mXsthnzLh21oT5Chcx5W6ZmRp5l8+N8u8hmW5qF17UPp+QU+dlil2FNF
ApyoyftRcpRAf8qerfInBTB6wBvl0QjE3Vckt/8mQJdLaG7EMQL1bsWjdmdW
cuOLd7vpBEyOX0uiVAsQUBtW3x9DYFPZ9FXL2wI0MazpKiwCiopHdfTfCCAo
keUnSgicdzOWffVOgO+jKR4BFQSohdK34qkVvs5bh1pFgK2fdWPjrAC67E0N
mrUElinnPNYvC0Diar2/UkdAGj2QTf5GCNiFsSfvrPzSVMZ4tlaIB2OMQ0/u
ETAjhfoItYQoTnO3aGgjQM+b0/9aV4jRscrJzA4Cr2s07ihsFUIxkOul07PS
99dgVYeJEBytAHPZXgL6VpJcrpkQBQZk8rs+AoH3zQ7KWQnhEUjqvdG/skdh
AW0/CVG5mVJ/boBAqVvrFuYuIbppHqc4QwSsCzmqdhQhumZsE+gvCQy9dJn7
11aIapH8Ic9RAv8Bt6VjjA==
       "]], LineBox[CompressedData["
1:eJwVjVdUkwcARtMYEaTKcjAqgmlVRsESKQ4CH0Kh7CMirZriQBOwYa+wAiRk
wf8ngDiqVEIUsFgF5ThAwIq0tlQR4iiU4VFqHRjARBBFSe3DPffhPlz7PYkR
+6gUCiX0A/97VPsuxJ896ZVfTLGlFHCRUpPF8Ku+4/2+3XrHQzEXPGMN26p6
xDtHt/ZIB8lFTnsthVat885kxZmLjnHx/rAw9I1yDuJd1AbzL3HRTtPqdEoL
sNQnxi3GuLDd6BDwUknHOuuAa6tY8Qi73zkxrmRA+xO5N3xdAlAmNP4qzQ8k
W0K5Oz8JZrqoxrKYMFzJ3xTc8CwJXld4m/NMI+EbGJrp1JkMZWr7mcFvt6F2
UUSY87kUDAcOqWf8o6Hi9Nqz5KnYF5yt2XN7N7Jag5Sm/DT4tLym3U7Yi/pr
FhR2XDqMLz+k2DxkIz3sG9Zzvww4vQxI8JTGwWaoIkbnlokNzda/MKlcbNeF
cJzMeGgI3PnZb4kJmGyODKGN8tA233TWTJaEWEHU4O6/smB9uXag8XoyMtTq
2LGmbKwQziS3WKZi56eBSr0qB9FuRuUSThpUK02az5G5MHMIPdlZlY78xvDu
8tg8JDLDE7naDHh4Fsunt/Lh94PEuciFB1m4dzDJyEenOV9lIMrCdrfMbXfM
CpCZ9Lkq5F42lh2cymuUFKB6sUUF1SQXZzY22dVMfuh9F73oMXlwHHlhOcgt
ROej0oEmJR/p3TEKx8FC+PXSqYZ9+XhRJsgIDBTgckJL0khFASKibJvqrwog
s+T3Z7sVQhj9Op7uIsSaXuXxgKFCVHNC+cM1QkzMVK2eKhJA83WwPs6mCNyg
ltMseyHmJYhnP5YVoa2OUTLdJcSCCq8tWn0Rulb/HhMSV4QH7xkrxxNEeGmz
/iMBTYQH3r1xrQMiaJYZzbz4WYRbglHqzc1i1Pi+0pgEiSE18rXWXRXDjefF
jH0lhmvZUgnLQ4KcnhMi3gEJTrIcUoZqJRg6+rh8v6sU/pSRWy6LpFicJn5X
1ifF3ZNW+R3FUhglb9qZnCHDGpI8G/9GCnXud7Zi+2JkZ/AZO5JluPA2UpX7
RzEmPJY6WD2RYUslZ7kTuwQMpqZyLLIYN0L6pxeaEojxBdvgZjGm7Nh/1p8l
sJvsOeO+sQTenNt7VgeRKGkwZLufKkF06+GoAS0JlbotNdOWwDr3HF//Ujkk
6xv1PQSB+zmbHOcekGMJ78CVNjmB9A4js86DctRdzMisLyVwPvzIsM8xOX5l
MMeFFQSc91/IYtbKQXXpGv6ykoBd1XjD2lY5+Cv+aas8TcDIaO8n9KdypBlb
5sZ2ETgV7jTn0XM55gTNeGy9ScD/kPaZUiNHuXRY59NNoIheeMlWJ8f5uTXf
26gJzDKPR1jPyjGh/2JHdz8BbUqf1GyRAvtfBW9Y+4xAaXNVYs8SBd66uU7Z
jRJwpXCiFFYKyJLNzy/QEOCSk/QFyxWoG+tzeDJB4N8686uGjgo8frrP6uj0
h99Yf80NZwXSVgXeE78lQHevJsSuCtDYzmWp7wjs6nDdTnNXgD6iNQylkJg1
fI3rHgqcs7/fuZ5K4sfw9lWCDQr47GouWEkj4XlItNCHqUDv8UpPCwMSfw+G
TOq9Fdg1lD+tn0fiPw0COcM=
       "]]}}, {InsetBox[
      StyleBox[Cell["3/2",
        GeneratedCell->False,
        CellAutoOverwrite->False,
        CellBaseline->Baseline,
        TextAlignment->Left],
       FontSize->14,
       Background->GrayLevel[1.]], {18.976439462621727`, 302.7284566096908}, {
      Left, Baseline},
      Alignment->{Left, Top}], InsetBox[
      StyleBox[Cell["1/2",
        GeneratedCell->False,
        CellAutoOverwrite->False,
        CellBaseline->Baseline,
        TextAlignment->Left],
       FontSize->14,
       Background->GrayLevel[
        1.]], {18.976439462621727`, 49.991126811481195`}, {Left, Baseline},
      Alignment->{Left, Top}], InsetBox[
      StyleBox[Cell["3/2",
        GeneratedCell->False,
        CellAutoOverwrite->False,
        CellBaseline->Baseline,
        TextAlignment->Left],
       FontSize->14,
       Background->GrayLevel[1.]], {575.1177368615588, 654.2956574146198}, {
      Left, Baseline},
      Alignment->{Left, Top}], InsetBox[
      StyleBox[Cell["1/2",
        GeneratedCell->False,
        CellAutoOverwrite->False,
        CellBaseline->Baseline,
        TextAlignment->Left],
       FontSize->14,
       Background->GrayLevel[1.]], {575.1177368615588, 551.1375636194322}, {
      Left, Baseline},
      Alignment->{Left, Top}], InsetBox[
      StyleBox[Cell["-1/2",
        GeneratedCell->False,
        CellAutoOverwrite->False,
        CellBaseline->Baseline,
        TextAlignment->Left],
       FontSize->14,
       Background->GrayLevel[1.]], {564.8991849918814, 463.45318389352366`}, {
      Left, Baseline},
      Alignment->{Left, Top}], InsetBox[
      StyleBox[Cell["-3/2",
        GeneratedCell->False,
        CellAutoOverwrite->False,
        CellBaseline->Baseline,
        TextAlignment->Left],
       FontSize->14,
       Background->GrayLevel[
        1.]], {566.8333140784059, -191.32415107215095`}, {Left, Baseline},
      Alignment->{Left, Top}], InsetBox[
      StyleBox[Cell["1/2",
        GeneratedCell->False,
        CellAutoOverwrite->False,
        CellBaseline->Baseline,
        TextAlignment->Left],
       FontSize->14,
       Background->GrayLevel[1.]], {577.0518659480836, -402.7982433522848}, {
      Left, Baseline},
      Alignment->{Left, Top}], InsetBox[
      StyleBox[Cell["-1/2",
        GeneratedCell->False,
        CellAutoOverwrite->False,
        CellBaseline->Baseline,
        TextAlignment->Left],
       FontSize->14,
       Background->GrayLevel[1.]], {566.8333140784059, -304.7980542468568}, {
      Left, Baseline},
      Alignment->{Left, Top}], InsetBox[
      StyleBox[Cell["F",
        GeneratedCell->False,
        CellAutoOverwrite->False,
        CellBaseline->Baseline,
        TextAlignment->Left],
       FontSize->14,
       Background->GrayLevel[1.]], {28.590332907319862`, 460.9120627588813}, {
      Left, Baseline},
      Alignment->{Left, Top}], 
     GeometricTransformationBox[GraphicsGroupBox[InsetBox[
        StyleBox[Cell[TextData[Cell[BoxData[
          FormBox[
           SubscriptBox["F", "z"], TraditionalForm]],
          FormatType->"TraditionalForm"]],
          GeneratedCell->False,
          CellAutoOverwrite->False,
          CellBaseline->Baseline,
          TextAlignment->Left],
         FontSize->14,
         Background->GrayLevel[
          1.]], {401.11016633293957`, 781.1156948085691}, {Left, Baseline},
        Alignment->{Left, Top}]], {{{{0.9999999999999999, 0.}, {0., 
        0.9999999999999982}}, {183.7155751139985, 7.645874120490092}}}]}},
   AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
   Axes->True,
   AxesLabel->{
     FormBox["\"B(G)\"", TraditionalForm], 
     FormBox[
     "\"E/\\!\\(\\*SubscriptBox[\\(\[Mu]\\), \\(B\\)]\\)h(MHz)\"", 
      TraditionalForm]},
   AxesOrigin->{0, 0},
   AxesStyle->Arrowheads[Automatic],
   ImagePadding->{{29.428571, 39.}, {1.1, 20.}},
   ImageSize->{607., Automatic},
   LabelStyle->Directive[Bold, Larger],
   PlotRange->{{-20.833333, 1020.833333}, {-663.28634, 961.495625}},
   PlotRangeClipping->True,
   PlotRangePadding->Automatic,
   Ticks->{{{0, 
       FormBox["0", TraditionalForm]}, {200, 
       FormBox["200", TraditionalForm]}, {400, 
       FormBox["400", TraditionalForm]}, {600, 
       FormBox["600", TraditionalForm]}, {800, 
       FormBox["800", TraditionalForm]}, {1000, 
       FormBox["1000", TraditionalForm]}}, {{-600, 
       FormBox[
        RowBox[{"-", "600"}], TraditionalForm]}, {-400, 
       FormBox[
        RowBox[{"-", "400"}], TraditionalForm]}, {-200, 
       FormBox[
        RowBox[{"-", "200"}], TraditionalForm]}, {0, 
       FormBox["0", TraditionalForm]}, {200, 
       FormBox["200", TraditionalForm]}, {400, 
       FormBox["400", TraditionalForm]}, {600, 
       FormBox["600", TraditionalForm]}, {800, 
       FormBox["800", TraditionalForm]}}}]}]], "Input",
 CellChangeTimes->{{3.521480325365477*^9, 3.521480405951092*^9}, {
  3.521480442207121*^9, 3.521480501844575*^9}}],

Cell[BoxData[
 GraphicsBox[{{{}, {}, 
    {Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJwVkHk41HkcxydHJYXR8ThKx6RNiGewu9qGjxqUDCVNkXuYyTSOmSFz/SoN
455fh9AhM4Sytdndkrtv5aHDLtqnUhpPsko1I0wUyqz94/28/ny9nvfamKSg
OD0CgUCb2//8OP7N34c54ZGeqhvQHeMAr1LoQlX+46nvNXTZRsgBgbGGaakc
9Mxc/JhF4XFA3FpFMFBqPXMqijSiWA58L5bSphT6cKbHcWpiBwdaDca1WsVS
uOwYZqYmcsDmFzvfMQUJHgzVe/RWHIaAZ22jnxQuYELnXajtYAOckhp7p1Bh
iDw2u//DISBq6bWnGAGQSxDHKx1Y4NEk2IOZBYMoIY54NS0OFPzW668OhMDN
ZwcZ1aUM6N+pejLjEwFNzuHNvoPRELdLpInpioYlWew7/fpR4NX4xaArMRb2
T9XqWKFhYFw/QLAeYIJ9e7mcrj4A9mO+iVuz4+Fs3jUu2XUfbGmwQhQ9DhSR
O2OCmvbAjZ2Rtu1JiRDpHFqqqvaHlkVms8ScZEDqXavGqN5gVV/VV3ufCyW9
T3iWd7fCOukMt9GCD9YpfZPGCnuIIBudzmKlgIxKs+ExPt4h2tEut5Wlgtp0
8mGIuSNKogQmccaPQMr9iuHsSAqinstyyNgsAG/JdAj7ojdqMz9aPj9TCFW2
/GK3VTSUluxY7v9UBB+v3PwkpQQh5fKlhXqmEohXnTO0u74PpfXWeZAYGNAt
WR2vmSGo7c3Jvj8VR6GSbyMOHghD1B6S3sLeY1Dru+ilrW0Uqk9sTB4sPA7e
IcLOmtlolGNx9IWInA7GItXtgnoGcu5RXPJVpYPsktuUsDgOjc6UbZzMOAF1
JMfv1QksxPFr/DVsrXTuB8tpl/XxqKXaJe/rIymQd0/7P9Sx0aONDxj+8Rkg
+dJV0tzEQWPW7vNOGGTCMR21eiwxEWlWGc2or2XCecPnhiWkZFS5/bPG1E8G
pktlrm91yYgs8KAc+iyD8HVOJg0jXCTursgUnMmCHQ1B/zb+xUOq80On2U7Z
kEdovxB+hY+Wp8i+nerNhqs7XWYzzqYgI+62SO6RHIiysg7v46WiJ5JwG9na
XNCqvzHrYo6gW9PB5ZKHufA6aXMQOSAN7b3IWm3PzIM40Ut3lZ0Adfi/+Gpi
lg8dsuOdiy2EaHIN83HNb/lw10p58PCkEHmyumI2+hXAikhiJ7tbhCKai+l9
4wXgXSl+N9IsRj+7ibf7nJSDCT9KpzwnQc/E2zYZnpGD4+iGNHGpBKXeMyK2
nZUDLUEzEqyUoD8CS/q9LsghlyXqX3BVghzYt4SUKjkYhBW2JNRL0JqyTzdc
m+UwQ30gdn8uQUZGsStJw3IYXuH8tXsZhq4E2uu/+SCH+YWTSTUWGPIpGn+v
0MjBltjyTroSQxmk9Ns2WjnEGvs9/3E9hmYpl4KsZuXwWseou+iCoXFebzZx
GQ5Ph4tTDgVh6GRDWVL3Chy0cRFqLzqGnAgsOm6Jg/ng+ljrUAxxCiZIS1bj
EKj6fe/f0Rh6W21+Z+EmHB71PCa7cud8Iy8qOxxweB9wumZJKoZIbsp8mRMO
CzoPrHsnwFDUPadQAzccfNqHiOePz/Us/AL3f8KBsf1aDj8DQ6WBrT+c2IKD
FPHm0bIxtLUo08SLgoOS4i7ckI+hl6/8J3SeOKBG3agOx9B/t7lYjQ==
      "]], 
     LineBox[CompressedData["
1:eJwVl2k41N0fh4coS9mX+UmMNZUQbTwxH2XfSUIRytZmEtmZyS4xRZQWo4VW
j0qlEqfSos1SpCzPRHu2ZCuV//xfnOucz3Xf33PO9825rqMRFOERLEyj0XoE
4//zt5HfTjYhYxaCpV/k15cWkWfiTKzKXjJpMo2+CqZXmLGSAyFUWR+TVlIe
ob34HjOhrpwmUvaDSasTk41WbGX+KU51/smbAbaGvMOsj++YdSIjP37w5AHd
Yw1ZGd+Zav8ssP3O0wKIbd3bBhrOW/y+PWmuDXZqZ3OIhRCWr24yonVqA2Vt
JxbdEIKLfbSKtKIusGfLAv9yYSSvvzugn60HhJeb+CeIoHu3T2HYrsWgpbzS
TZ+eBZf2huEhngn4ytrOG3ZKIeU/Px+pcRMglS8X1S6Fqs/jd/UdlwIq/JJi
c2nITukVhI8thVHv4mfJIjJ4pb5/WZ/9csissv8774kMfMPXxbePrARXVkFl
noUc9kUO9o7ammJYWnHG9q1yqE3IdJQ/bgoo7rprXiSHeXk3Vd1szcAfiJ4f
3i8H/pV59Y1H/wGDVru/86A8Qn9/mHHHygJctVunpB8r4LBoyvbOIxbgVcdM
xfcr4LEUve3noAUY/Q2TITKKWKjhUL78CBPDDwqCiZciJjTXa3fsAZrrZp6L
7lYEt+KUd2gZUKWT9rT3jyL09Idzx58CvANzyprmKcF7WfaYgoYlmn/d+TF/
oxJu2d5+6P7UEow2zaXNrUrweDZrij9mCfa+qs8rhpTwzc3TkMVYDXaYQqya
pDJUfQeK86JXg/efzf1QS2UkbVcPf6q+BsSpOuRzhTKUvm877uuwBgxRHwcr
oozK6JqWL1FrYDTrtaNahzJ6kt3NxJ6sAbdNy8NpJh04kCppHWWFYTHlBXkb
6XjUo2QhfMwK5KdOaloEHS7651n1963A3VOmIL6XDr9HzW2m8tZgHFY6VXuG
jvcKW8QmzKwh8yAz9dt1OrYHTZhVB1mD/PUMOvuIjvg/83gGV6zB16r98PQT
HUKOl1u/vbEG72Y+y3iCjqzDVqLnhGzAUjJ5qDuTQrHJtq1a7jbgvTI4WaNJ
oTq8Zil9WJDVI3tTvCj8c8MxtE3ZFnyH5xlrgyjcE/nvyEGmLWTajpdW76DQ
Uio6PTvfFm7CGhLqqRS8Bw4veXJd4GvGOOjtp8A309+S2WML9GZ31RVRGGzz
aBQysIPbBfnXBWcpRGt9nKpbZ4fmKtElrVUUfrPiDBKT7BCQeb7+eA2FtLrZ
gaZn7MAaOZU4Xk9BcjavYPyZHapMhgK7HlI46GPy8OqoHYY1P4S7PqegUvFw
kqVqDyNrs3zXlxTKRn0WGVjZg/bu77OuDgp6qwf8vm2zB0O+VG2im8K/+Wzu
2QJ7yPB7U070UljeLX8/+LY9eNaD/a0fKdQtrBjT7BP4DpZBhV8pWMea6fEl
HOAmUdPVO0Dh2YPnvseNHdD8IMenbpiCp3zgfl9fBwx/dW7X/UGhM2C0Xnmv
A7jqI26qYxSCKjNHXp1zAM2h4dGJcQpfplR0DrYIePEO08oJCiz7yvWuPwX1
nB+nHSYpTBZZ5szWcARe3hCPEuSU969qG+0c4XY2NnShIM80DhvKYDmCv8ut
boegPi9lSsPqsCMYo9ekLAT7Kz7P8xQiAm6V6HN0lMIxFc3Muk8C/ri1NH2E
glbYtZsJ0k4IWGTd93uIwvlrdv0rVziBu+m2jpCgP+MZXWrj/k5gHIgLP/iF
wk23CPerGU4wUmdcrvpAASeE01iVTmjmXpje8I7C42+Hri9ud4JbdpR3YRcF
V9MFX77+cQL7lmG9z2sK7Rm1c8/qOIPRPrDiYgsF/1euLsHOzkDS3Ef7nlL4
oNHH1ox2RrMBZ9dkA4XRWvGPxxqcYZT3Tj/uOoUEieN0335ncDtX2O+vpCDs
beSorOAi6C+p2KCcguwPr6oDm13A0Ex4Ty+koOan4ZmZ4wIikvKqIIeC/qNv
E4mXBX62dyaPTcHuKJsZNi3g/F9rI7ZR8BJ17PPTdQW//FnSkgAKmyMUM9c6
u4J3Oz0n3ZNC8przLyyOuoIr6s3q+4dC7qWoyKX3BP5LpY0DBhSOKDOVFn5x
BaNzllu2BoW3Y18qc+a6gSj5x8WIUhhvTB6PDndDs4KwsMFjOv783fx4ONEN
RpImfo036BBZal+yjesGhvBVlYlyOmRPyFsE3nAD+9KDIfE0OvQjz6Y7ibqD
GzwrXsqUjs0qrQpaZe7g2xi0l+YpY6vrjY/Hq92BMzN/h8Yog5V2rIb+2B2k
hBl9f5MykgdDNkoNucOIPXR2qaEySu5Nnfq5ygNVZWJ04UYlNG/VMWnu8AAO
Ks33/ayI16USoo79HuC1nI4JeKKInldD7Q+mPUDbUeM7dUER/Ra34m/rrsVw
ZILx0A5FzJJ3vVcetRYBa2sqWwTvucXtWPckGU+Q0BWTRe3yYLR+eXFCxxMB
nOvclkp5CH3xdSJmAv5ikpufIY8GJXPbGcGecGuL8ShaKg+HSCHz7JueaG4q
vtyaIwevBTl6h4LWgbtg5LkuQxYrMXXmesw68D9uu392WAbU+u1aHbnrEFBS
waoiMuhKc1Gbe2MdjN6GHnTfJIMgvpxCmaQX2Kbvn9QtlkZE8dHpi9VeYPwx
bD3aIwm3ytlJLxq9wK/Ym5PEkoTxg6RfQz1eoD3R/R0hJInxkU1jxuLrwa/W
2Z3FkECii/a3Gr/14P2KKj+wVgxZopfaG2Z6I6Bz53mv/SLg7a671OXtA5qF
8uiZ05PMn4MeCw9tF2QH+ZpK3gTTY+uncme2D9iqImOLjo4zRQJleHUVPkD1
peyMfaPMMJegg7xxHxAVMZkmn2Gm0YKZMVsKfUHbyLFRvdbDrO9xRn/TBtCM
57zIKvpQT/ftrT3dtwHsU890z/39VM9q22PqNyHgVitjr4Z/rdd8Vmr8Qm0j
2EfTtdh2Q/UZN79rV+3YCKgu0QorHK13KTwkHiXpB9I14Jty8299j31365SN
PzCv5No9MQkiV/Hnl+9Gf7BjXkcYP5YgNiJqWrd2+SMg/OXUzixJcqnOf3fs
MX/wVOYUOEnOIYkmfPmx7/7gm2pOW8+RIdS8Ps/BY5vgJnW3xstQniyMjdrG
igtA1UVzLeE7FAl2jB8IagrE5yqpJy6TWoRh2XGc/yYQK6vtCj8Za5Ou5ctd
/N8HgjYkOvf8Dm3ioTlS6fMzEKzB5k8X+rQJfoaz3LSCkBVz0aq0RYeoVvj8
MI8JAmtzu+eia/PJS2HTn3T1zVhZfL17dskiYnlrQqRp5xaE6Zc93PB1CZGs
eUeb+y4E7GdGKq5OZmTRd9udq7LCsSUkrOOP5mpidlOFmAtvR7PnDdl0TVvy
r/0mnYcRO/F+SxjbzsmJ3JGQ+SubzYLSHotRZzl3olJT3ll1fxd+C428575f
SzRTp3bdou+G6kxLDyvx9cTfWPxgZmgUtNff9eEt8SWyC5xPN5RGozcrTddq
iR+JMHeN2D6yB92n/mpbMQOI1ZFM/TSDWFzQV7/c8iKQNMgln5yZHgfhxk91
SWmbSQxr8Umntngops165bI8mJQpyhcKSyciQDV3gfGLEBLTcd1Ca3MSIg65
fIrcF0YaermdV3nJ2E29qy5fvJVYtWgJi3Wk4PQb6eHLjdtIzc5brL5CNope
SxreydlBsunJb+KNObBjeBxNNIwgRi28E7bdHFzK7LYvSGSR4alSvfG0vUiT
Xyr9y28X2e5w68JGjVScK5cebDKKJHcqTPZNPklFyLKekxJKu8kTvcebncLT
UFR4bmFG/27yfa6p0F6RdORN5Pouq48iA/PEp/ovpmPukmXVlqejyZk1owPS
Dhm40mBeuy5+DzGOtTAPG81AYUHXnkdBMSSh+VR6bEEmeJOrl+uuiiXdJR8O
bjXMgqf9oetZsnFEMSrj94GOLERuJd02P+OI+K7Vm3btycbe3AluU0s8aU30
U8vQyEHH89wz12oTyLVfnicTG3Nw4Wmfff6pRLL2WKj6opB9+HXk2jd6QhJ5
5PRmUkomF4d17RRpwclknBHy9HxlLpLbBp/kMFMIM7QpSM9hP0be/zsxIcEm
/rXFXp0j+xHcU1Tvk8ImK5clrLHh5uGB8MoGkX42aU9YvVC0IA+O3pc1vw6w
SfQ9cdmGQ3mI9Qzb2zTEJldcD/dYHhVk/n7rkh9sor/1Wpx5eR4GL1x6azjF
JozSoX+X1uZBX/An2SDBIeLiW1S1PufhouSq0St6HHLWddGM3q95KPp6N+7w
Qg6xKRr5whvIwz/n42nJ+hySpsW5ofYjDxoJqbL2Rhzy1/yEh8rfPPxa9sXy
vxUcMhLZkSWrkA9PsdpOSVsO4d4sjWhWysc2Yhf13Y5DDGmhXvlUPsq1Z0i9
duCQ7fvHtOao5yPl7LTVSRcO+VghVy+2MB+Dp6XurvQSnDf45swj/XzkNEwH
qXlziNaystwMw3wsF1KdKeLLIQH3DH1FluUjLPeVa5Of4D5iE7i/QuCvZI1X
b+KQ46518/ea5WO8dtmJkkAOWVWULmVpno+7j7Vt2Zs55G2X09g0Mx8akubf
g4M55H8d9U/S
      "]], LineBox[CompressedData["
1:eJwV1nc4V+0fB3BZoSEjicr4Vo+k7DLCm2T72rNsKZ2Db/be40uipImMjPIr
GspMJRmlyINUUtFTWSUhHut3nj/Oda7Xdd3Xde7zuT+f93VLuPtZHmVlYWH5
SD3/vcemFk30vGY0p16vzKzEkPAvCVPULfxb612NiuODKBKhaya8NhcOaynJ
htz2iyAR0VjKwl74W0up6LrKWDCJpYsJpvMFbPi6l/aRw5dEI/vU798FAijF
kfrnR0hsU9+l/6uAhubWgb25B0iUay7Wz2lsR1aMW8Q9NRL7dDrlWN5vx1ze
3JeXKiTohkEivBt3wpVBCq5VJhFt92RCJlUKXIkxqyv2kPgQ4JB9/OQeXGHd
bZkqRq3va578WaAILoX4lhIOEjEfnRzWzyriuKp4OSs7idvfZ5/IGCthi9J9
dw9WEnwLUue8Z5SQsX+XvdwKgR6x08rDhvswBzJsbo6Ao7dNeN+UChruKj/Q
mSBwyv/H0LS+KvquFSV9GCPQEJFiLJCniroGT83IUQJbM2q3mOurYQPzKuPZ
NwKf7m591J6jjhp1zCUPETi2+A/bQ11N7BNQOd3aT+ASRwz5/rImssVkwwrf
EGhbL9w7/0MTXyrmXWL6CEhLGJXuu6wFBeklCf0eAn8k7bb3BwPFwfezOLsI
nCm7Zn+sEAhPtGWwdBKQkplMn30BSCm4mC+/JGCvnDojKKGNxQJFUc4OAnX6
9S0WL7Th6sw+faiNgGXH6oVPM9poGBFccmklMGZuLcsQ18HQUzpvdAuBLY4T
FzOCdKAr6WLZ0kwgihTzfiF2EII5m46nPCEg9IvIczQ6CFffys4njwlUBNW8
Hgk8iCMh9noslAejLdS4nh8EJ9sZj9RGAjibsOZQoC6KTG/6ddQTaB0U0mTN
1cUX6RZ5Bcp0mXLGo6e6aLm2PT6njoBTa1evqsAhGBQndYbWEghf2lqw9+4h
rH2xeZdzNYFVxne6x94ewvaEW96fHhBgXtLluLFKD+wPR9W9KF9UJE7QLPRQ
zPx4IfI+gSrvGiXhST2QT5Lleu4RUK82Pta7SR/9B+hcAZSb2D9eztLSh/k6
/8CNlF/nc6yszdRHcN4Uz9G7VD0nLsk/f6APFe13yvyUP6nJeKYM6oOdRWm2
6Q6BH72W7av2GsDksJKKLOUg2teFRhsDfBczqxu9TWCREbY3MsoAi6bN3Tco
JzaudVMtMcCJNy1xJOU1awvOzXYYQKo7uVWBcpaDYsu9aQMEh8gXL1YSEClr
mWNsMYQM7dem55SldCacxghDmJQaPfOjXJkZe+b6OUNUDEiv6FPe90Hg6dF6
Qxj03eyiUW6ULpuRHDbEeNa4KhvlQ6FqUp94jHBXnk39awWBjmcvHfMUjHB1
krOng7K1gNtpR0cjHJBZw1FN+b3r9KNN8UZwdRF/VUzZvSJlqueGEXokrWUv
UB5ZENmR9doIcnvuSJ2izDCssDObN0KxpVZdAuW5C9ppayWMMZTI9iWGcsyX
noZ2A2Ow/r1S8p85FY7/TGYYI9JbkeW/9RkxCxK6l4whl3VlKpXyxpcZ1qse
GyOwam9UNuVcEcmUxm/GELf5ml9EmXb8fm0Erwm6hO47VlEuv28wrrLfBLO1
p261U1ZgG9g262wCua32l4Yo15r7WdxLNgFTg0N0hTKusiYyKkzQvC9CWYyq
T9vY+Qd7+kzQdjD/mw5lM9VdI6NLJuB8ZCV/gnJfcoPo9R2mmJQM5T9P2bnH
jH7U1BSxPCNpTyn/IzEcKxlkigb52CszlEm/4Hsfc01hHSyovZs63+kG7q+5
zaag94dFe1KO4MkTdhw3xc3wOMtCyqz2csabBOmQKp5v+EyZ77ft7bMedHQ5
e1n7UP21zUnCOiWNDk/JC8sPKMu0jv2JvEPHF5VKEXaqPw1yYrWOr9ARO3aj
7DplWw7jYaedZpjTWiPMQvW3h9/GFCtTMyw62Mw7Uo4+WP5KM8cMy+nJ60Sr
CKTfCvRXajKDUli/Vizly5u0hKRHzFD89/fP3ym/mxmpSBM1h8i3pYBmar5m
26Nng7zN0WUR2lJMzefSskfbZKQ5mm/SfXbUEGBXMrxCnDFHTSZ/3A3KfFcF
NN2qzVHxqH2inppvGf/rSSYcFsg+sL+Lu4GAYtlpu1ZhC+o8XnaXUFYb8N+l
I2MBmagBzUMPqf/T03i534pavyrKIoPKFw+RbkFaoQV6RHotDal8OmFW/TWv
ygJparbnWJqofkzMrRFuswDT5oBqPeXoH15H1v+0QEXO8l01Kt+uNC1cmz9g
CQOnQ3R3Kg+7TuxQ7Oq3xHo2kxyrVwTe5PNwGI9boiEgZBRU3g72/Ox7tmKJ
9Nr15+WpPB7XrAuv32mFCq/b81u6CawWMGsqDbSCOU/GuCiV55r1oRZRG6wx
t/NJZ+0gAfHukVdXd1iDne2c3sxHKs9GHE0eq1kj8NnOIqXPBJqFNPTZjlpj
OliP7dEwASP/VRqptdZIe15MZx2hznNXmtR5dxtkXGXw6EwTUMFCyYMQG0SW
OOrVzxDYbEfS+tNt0JCbbK3yh8BAIn2baLUNGLrFQxr/UvP7iV+wcI0tWg55
FAWzkPC7mLNys8oWaQ+n0/LWkTCvWBv1qt0WNfo3zKx4SSg8i/r356AteNJD
X6/lIzE75TKjwG0HQbU2zlOCJCLp28dqnOzgZW65oUqUBJPjVl8zpz2qeH/Z
V0uTKAhovDVg7wCjUV6JUGMS8z8spc+TDmiRtEqNMiVheeJbqWmsA6pOFnMl
m5Fgd9tQ0FjmgIoYPv0CKxLH6e5ZBbMOkDstnzd/mITcLs4Qz2xHOH5OidD0
IfFo0BTjnYcRriIjuzqLhLDjUEPx8GHESpm3k9kkGL3Bqk5/DqOqmTTtvUBC
siNf4dW2I1AKqFhXmUMiufbX9ts+RyDOv6ybVELdJ7LPcweucYLOhlbt+loS
g4Yfuhf0nIHSK6M6X0jwly3963jEGWSj0oTGNxJ67NtodSed8W/XRtqBURK3
Gp0DQnOdYbDUI64zSdVH8ZPAzC9nPD6qtydwkcTmrcPWP3JdkOaf2+W70QfS
oYEEI8wVrxJYj9029MFR4/AJ9043CL27VTNT5wNx7f68T2/dMCXddj630QcD
+/bRnb+4QbeyfL1ekw8sJacqHObdwHzs2VHQ7gPMezPMae6oUl+nG9Tvgy1l
Dr81QtxR7PKMeWnWB3+zqs4Li3nAyKfxer2SL7Tr/rB3+npCSfO0+4YaX6yp
+cwi+tkLekasoRVP/bD7l77vAaY36H/KN4nGMaBWK/JYg7pHhW97/KZO/CQq
DV12tPj5Yq2eYvW1ZyfxkGfDMl8qA0WSZ7vtYv0hUlP6/vbTk4hra2a7pBQA
yYSFk3XCAUjP+nDGZykAzgrcWSnHAsFKKn3Y2xoIvl2mxc35QRgMTPncmhwE
Pw0zP3IqGNv+0lNpcgiG7uUUmcS9oTA4OsSvIhGCZv7oIs6kMNj83kA8WAhB
CGNPkUlvOCY7cj8a9ISicKNANitvJFzTOdVH88MQ0v9Ak+YRBXq8aYpidDia
h868v1cQjanpvyQX6RHQfU1j5eqPwYB2/Nq7WyJR41vHGM6ORXNAnPLnxUik
Cke/DVeIg67Oa/XJV1GQe11wVf9DHATLJ5t97kVjciFfajYxHs5Dw5XR2TEg
jer+d0QiAVc6EjTiFWPxsEzx1NzzBAwa+MpMl8TiuVSbh4l3Iua/yxzn5ovD
L1HVVfHsSeD1NtdVDY/DxFbuhfGbSYgNuW+VPR6HkoPTE7xGyTjrW7A12C4e
CqGaGsenk2FfquyS8CIeEV3XkkLPpaDTM5GTRyUBH678k3VClgmFP4WO54oS
sDEwefFsPxNvBU+J6wslgvukjsvJ4FRc/NHJ6xGfiO5Ip23JEmngXJCkl/9J
xP1/rYsi29Pw/Gml+PiJJFjlHhPb7XUKxG2zXmZfElpN3s6t35AOiMmOmxsn
Y1bc60V5RTreOPre9KlJhtaxTncpo9PQu0gwQmkpcG64aPt+6jTYgoO5Ki+m
QEU54qDemQwYq599LM/ORF+EjjTHuQwM79tMCHEyEdTEzdd8PgPb3w4KLaxm
4q7ZpUHtnAwY3JHwb17DhMyJ+2EapRng2Ri5306ACfH8n5VKDRkYVNu/FCnJ
BDe35xba9wykc57wbwcT1812sw2NZoB5avlghQ4TehemRgomMqD165nQOV0m
Emlx1dt+U/tZP/7oiAETyxpXLUWWM+Drli4+acbElH8/k08wE66ePSKbXJg4
U5vv1yWUidQmv5UFVyZkWY7ZZm7ORH+Hyj+f3JkgT8/Q1ollojfXsqrci4mv
ZfyPuKQzcUY+11XTl/rej7clrTKZ0PyTQ6cxmKApF6Yny2Zi+W2LBpc/E65N
so7sypmwvZMr1h1E7YfrD57uz0Qamz5/dQgTeWaNf8WrZYJrryhnbhgTBy4k
rdfWyMS3j8ILsRFMvBswmVnRyoRDm9avo1FM/B+301ap
      "]], 
     LineBox[CompressedData["
1:eJwVjnk41AkcxidsmXpypkjubOQqR0mGb7kZaVGPECFXWeO+r/EzrphJRCkZ
SrYS1qbcvo7dUo+7lRIJeVqbmJEjNNb+8T7v5/3r8yp40uy9+UgkksNm/u9/
uetUc59Fo03sDpkZbAkpi9YxLRk0JvkBf+HpmtaoHbM+UiWTxqTMnjlN1/bW
2Jb7JIGSBWMSQ+pARuhA648CwvY7mx+S6pVRo3SitUWAu7DAFockTtWtbh63
Vfa4qgWHrQQgoWCnWsuPp4Y65+fYOgBdFUGLEhKY+OH8OaElHRAR1sk0iZfA
6s9Lbeo2utDnXz3DmZJA0TWVXP/Fzd1axwis3Y2v5bL1Jq2OwCH+RItxZ0l0
9j8TM8TVB9L3WVHaM2n0Xf/E32xqBMinQWtzVkDIIXaYhZlCncxYL2dEBUUX
zlbneJ0Cfa+NLmUTXTRqjPolXsQRnLoiVRqGDJEd2vL4vdM5kB8wQLc4Exyz
Gh1YM3eDcaHzlt3pluhtEzPr2esB76eSZBOsT+GJhmWB3sCLkLnWxP2+2x53
1H0kSX/0gXtqTxjuXxxRjWMRaJjuD01DJc/UxJ3QoH4vUvgCAENTpU12uWCV
lbvyX7RAUPS/vPpKzA2bt4vwRDOCoILec9ig6gLurbs/Ut0RDIXxf14poXii
IrEW3CAZCuR3ny1XOF7opk2+luYbBjKNDkWUUm8UVbW911kcDit2G65++r5I
o9jRArgREMcd7+xf8EPTm2nqKZpRsOExs0U07xJ2iiWUbmVEA5hNaXmcC8DI
II1S6t8x0H3awiFGMhBLJMTz+ITjYIKd13a4kYaRw0+NlLzigW1xQ8q9LQg7
J66O/MFOgErx7Kma/GA07VfiExxOBH4vGZq3XwjWBTYETeYlgYT91vlQaihm
SCa8jdGmAzX78vU2hTA81M++YzFKh3KayKg/ORzn14pVllKSgb1/8LHFbDgG
WDc8clUggLNaYareHoHN5TpXVl4S8FLOrMPnQSS+VHnhRfVPAc0cXimTHoUc
6WNbkgUYELWWd73uTDTOypDXvlQwYOK05uARwxgsM/k2K2ydCvmCI6F08VjU
jjKi+H1LBZ/wmmOKP2Ixtu8uIyo3DXT4tmQkvonD0cJP1y5ppUNfAb2w43E8
SoSlrucMp4Nnou1+t/wEJAefdA+OyID84D1jxbREHIg7L5uqkAkVS/XbijSS
sHbVsTSuKxNSHZSnnUqS0OG2r5yazxVYZR16476Tjs+pb1eERLJAs8woKzeZ
jkvyPq8eVmaBmaLNSaF5Ohr79nqqWGfDmcGZDJpLMro1FZwd4WaDa2XZcV5v
MurrxZqYX2UC58O0Ro8hgUOxJw/+lMuEtrtzPz8xIjC8nSzaeZ0JEf2j8oVA
YI3djbETt5hwm+G/x8eUQPVLtdGU+0yIFdMX5tkQKF88V6XbxITL5CRVTRcC
yeSL+5Q+MyEw7/A2VjSBv9mp8U/MMEFSPGZfeCyB5vncf9izTGheZmu7xBOY
okR/JrvABKs9GR4H6ATyKHfs9/KYEPZ7U1drOoHckOF00V0soBbRO+YLCLxa
X0zr282CyY/500M3CdQi+Z5lSbHghXLa9uZbBAZkLyrtlGOB7utlx4xiAqfL
xVoFD7Lg0Rfxbwrlm76vb8ueq7PgGHVNRvABgUp6JVmpWixw5jVafn1I4IV2
LWcBPRYYMV6wGyo3/wguQ8dRFtybE+9hVxNYZNdyINmABeNvjq6n1hBomM8Q
OkFhwbygrtqvTwh89566uGHMgjFbQReHpwT+BxQqjsk=
      "]], 
     LineBox[CompressedData["
1:eJwVkHk01AkAxyfH5loMW5soWdmI2HW0HYav2LFE1pkOR2SkhnHf55zmh5mh
1lHJjDOdFh0UHRSpiDbPEVaeXpeVEWpZu/aP7/u+73uf977f99ULYniEyJBI
JM8V/e/vpUsuVNqcDdWUpETKpCO6KsnCQfLcVt0ntdCFSUei8hRNSzJh2zlk
qHGWTUdKazVJTjJra0oL6rXn0/FPEcv1i1gW9RMejtcL6GiVk87OijXx8bV7
t0E1HRt3GznOiPUhKqUpG/TQsa+//eO02AKvKroTfjUKR8aY3wHVeQvIjExK
8kzCUfdm/p7JXkt0dVt2PzULB3nR8GTYnCX8dSsM9m8Pxx+6eVYTTtuxJ3yk
OM8+HAfDvJP7pTuQqcMf5PmHI3RpUrbFwQYyH86qVBaGA/ks5Z9jHSAdVrBW
VYsAedanLj94H7Ibr5X6KDFgcyvRPU3dC8nKD/0bVSMhjmm9/NL3AMZdc/SM
f4/EqNNI3yLVHwtMoyZFzyiE7E2eCuo5gnVVj/yKlKNh17wg1xNxFKL6vtWH
O6OhfHOcpD1Og0CqWiSfHgPjGccI6+wwmOY456v9EotdTevvUmToUA/zza9W
iMNVpwCDh4wIDIlj9xd3xqFFSX2ZzI9E862QtoEz8Vh/s3q4ri0Kj+MPLh4O
TsB3rMWo5nUxIOlsOT9GSYS/uWIBLzQWPh2Tq33XJoFs5FrZXhYHH+8Sn5bx
JDAobgy6NB6qlbW3O+8kw6GEZ8I2TYRKUDl1pygF7Rrp5V9xkvBE01tlZ0wq
EiK3lbu8SAazVKlR2zMNkjWap2TUUoE+fnPH5nQkDFy30Q9Og5K6VH5SIQPt
r0TDDeJ0xF58oUOMZsChV19GYSADS1z3bVTfTNyMaI6cOJUJ1RD52sSuTPDX
pQ8mm2eh8LLkuaNVFn7oFZ9zHMmCuHq5zrE2Cx8Xywzn2UxMXMjnHtFmgu7c
fPGwHguW7KHhRQ4TLTUWOZ+7WGg+UsFt/8JEl2FnsEsYG2+NapZJNBZmtHeu
YspxECu620B5xsLUBsXFD5c4yHBamq6xZ6PK/tOUmjMXmp9PJMddZcM80YZy
7BMXBqPkpKjNHKQ8q+AknuThdPGGwc58DkZOTxYcN8tGYNLbpxr/cLAmlruU
P5AN8p8pgTlRXChG7QmIiucjTnSjxmuUi75Uv41cPQIFQX65rl48XPvbqzz1
EQFRXOhxy04ePM+G6hrTcpB76VZCsGU2OlwGP6uq52JXScOF+7XZmN9Ee3zh
Si62mXsthnzLh21oT5Chcx5W6ZmRp5l8+N8u8hmW5qF17UPp+QU+dlil2FNF
ApyoyftRcpRAf8qerfInBTB6wBvl0QjE3Vckt/8mQJdLaG7EMQL1bsWjdmdW
cuOLd7vpBEyOX0uiVAsQUBtW3x9DYFPZ9FXL2wI0MazpKiwCiopHdfTfCCAo
keUnSgicdzOWffVOgO+jKR4BFQSohdK34qkVvs5bh1pFgK2fdWPjrAC67E0N
mrUElinnPNYvC0Diar2/UkdAGj2QTf5GCNiFsSfvrPzSVMZ4tlaIB2OMQ0/u
ETAjhfoItYQoTnO3aGgjQM+b0/9aV4jRscrJzA4Cr2s07ihsFUIxkOul07PS
99dgVYeJEBytAHPZXgL6VpJcrpkQBQZk8rs+AoH3zQ7KWQnhEUjqvdG/skdh
AW0/CVG5mVJ/boBAqVvrFuYuIbppHqc4QwSsCzmqdhQhumZsE+gvCQy9dJn7
11aIapH8Ic9RAv8Bt6VjjA==
      "]], LineBox[CompressedData["
1:eJwVjVdUkwcARtMYEaTKcjAqgmlVRsESKQ4CH0Kh7CMirZriQBOwYa+wAiRk
wf8ngDiqVEIUsFgF5ThAwIq0tlQR4iiU4VFqHRjARBBFSe3DPffhPlz7PYkR
+6gUCiX0A/97VPsuxJ896ZVfTLGlFHCRUpPF8Ku+4/2+3XrHQzEXPGMN26p6
xDtHt/ZIB8lFTnsthVat885kxZmLjnHx/rAw9I1yDuJd1AbzL3HRTtPqdEoL
sNQnxi3GuLDd6BDwUknHOuuAa6tY8Qi73zkxrmRA+xO5N3xdAlAmNP4qzQ8k
W0K5Oz8JZrqoxrKYMFzJ3xTc8CwJXld4m/NMI+EbGJrp1JkMZWr7mcFvt6F2
UUSY87kUDAcOqWf8o6Hi9Nqz5KnYF5yt2XN7N7Jag5Sm/DT4tLym3U7Yi/pr
FhR2XDqMLz+k2DxkIz3sG9Zzvww4vQxI8JTGwWaoIkbnlokNzda/MKlcbNeF
cJzMeGgI3PnZb4kJmGyODKGN8tA233TWTJaEWEHU4O6/smB9uXag8XoyMtTq
2LGmbKwQziS3WKZi56eBSr0qB9FuRuUSThpUK02az5G5MHMIPdlZlY78xvDu
8tg8JDLDE7naDHh4Fsunt/Lh94PEuciFB1m4dzDJyEenOV9lIMrCdrfMbXfM
CpCZ9Lkq5F42lh2cymuUFKB6sUUF1SQXZzY22dVMfuh9F73oMXlwHHlhOcgt
ROej0oEmJR/p3TEKx8FC+PXSqYZ9+XhRJsgIDBTgckJL0khFASKibJvqrwog
s+T3Z7sVQhj9Op7uIsSaXuXxgKFCVHNC+cM1QkzMVK2eKhJA83WwPs6mCNyg
ltMseyHmJYhnP5YVoa2OUTLdJcSCCq8tWn0Rulb/HhMSV4QH7xkrxxNEeGmz
/iMBTYQH3r1xrQMiaJYZzbz4WYRbglHqzc1i1Pi+0pgEiSE18rXWXRXDjefF
jH0lhmvZUgnLQ4KcnhMi3gEJTrIcUoZqJRg6+rh8v6sU/pSRWy6LpFicJn5X
1ifF3ZNW+R3FUhglb9qZnCHDGpI8G/9GCnXud7Zi+2JkZ/AZO5JluPA2UpX7
RzEmPJY6WD2RYUslZ7kTuwQMpqZyLLIYN0L6pxeaEojxBdvgZjGm7Nh/1p8l
sJvsOeO+sQTenNt7VgeRKGkwZLufKkF06+GoAS0JlbotNdOWwDr3HF//Ujkk
6xv1PQSB+zmbHOcekGMJ78CVNjmB9A4js86DctRdzMisLyVwPvzIsM8xOX5l
MMeFFQSc91/IYtbKQXXpGv6ykoBd1XjD2lY5+Cv+aas8TcDIaO8n9KdypBlb
5sZ2ETgV7jTn0XM55gTNeGy9ScD/kPaZUiNHuXRY59NNoIheeMlWJ8f5uTXf
26gJzDKPR1jPyjGh/2JHdz8BbUqf1GyRAvtfBW9Y+4xAaXNVYs8SBd66uU7Z
jRJwpXCiFFYKyJLNzy/QEOCSk/QFyxWoG+tzeDJB4N8686uGjgo8frrP6uj0
h99Yf80NZwXSVgXeE78lQHevJsSuCtDYzmWp7wjs6nDdTnNXgD6iNQylkJg1
fI3rHgqcs7/fuZ5K4sfw9lWCDQr47GouWEkj4XlItNCHqUDv8UpPCwMSfw+G
TOq9Fdg1lD+tn0fiPw0COcM=
      "]]}}, {InsetBox[Cell["3/2",
      GeneratedCell->False,
      CellAutoOverwrite->False,
      CellBaseline->Baseline,
      TextAlignment->Left], {18.976439462621727`, 302.7284566096908}, {
     Left, Baseline},
     Alignment->{Left, Top}], InsetBox[Cell["1/2",
      GeneratedCell->False,
      CellAutoOverwrite->False,
      CellBaseline->Baseline,
      TextAlignment->Left], {18.976439462621727`, 49.991126811481195`}, {
     Left, Baseline},
     Alignment->{Left, Top}], InsetBox[Cell["3/2",
      GeneratedCell->False,
      CellAutoOverwrite->False,
      CellBaseline->Baseline,
      TextAlignment->Left], {575.1177368615588, 654.2956574146198}, {
     Left, Baseline},
     Alignment->{Left, Top}], InsetBox[Cell["1/2",
      GeneratedCell->False,
      CellAutoOverwrite->False,
      CellBaseline->Baseline,
      TextAlignment->Left], {575.1177368615588, 551.1375636194322}, {
     Left, Baseline},
     Alignment->{Left, Top}], InsetBox[Cell["-1/2",
      GeneratedCell->False,
      CellAutoOverwrite->False,
      CellBaseline->Baseline,
      TextAlignment->Left], {564.8991849918814, 463.45318389352366`}, {
     Left, Baseline},
     Alignment->{Left, Top}], InsetBox[Cell["-3/2",
      GeneratedCell->False,
      CellAutoOverwrite->False,
      CellBaseline->Baseline,
      TextAlignment->Left], {566.8333140784059, -191.32415107215095`}, {
     Left, Baseline},
     Alignment->{Left, Top}], InsetBox[Cell["1/2",
      GeneratedCell->False,
      CellAutoOverwrite->False,
      CellBaseline->Baseline,
      TextAlignment->Left], {577.0518659480836, -402.7982433522848}, {
     Left, Baseline},
     Alignment->{Left, Top}], InsetBox[Cell["-1/2",
      GeneratedCell->False,
      CellAutoOverwrite->False,
      CellBaseline->Baseline,
      TextAlignment->Left], {566.8333140784059, -304.7980542468568}, {
     Left, Baseline},
     Alignment->{Left, Top}], InsetBox[Cell["F",
      GeneratedCell->False,
      CellAutoOverwrite->False,
      CellBaseline->Baseline,
      TextAlignment->Left], {28.590332907319862`, 460.9120627588813}, {
     Left, Baseline},
     Alignment->{Left, Top}], 
    GeometricTransformationBox[
     GraphicsGroupBox[InsetBox[Cell[TextData[Cell[BoxData[
        FormBox[
         SubscriptBox["F", "z"], TraditionalForm]]]],
        GeneratedCell->False,
        CellAutoOverwrite->False,
        CellBaseline->Baseline,
        TextAlignment->Left], {401.11016633293957`, 781.1156948085691}, {
       Left, Baseline},
       Alignment->{Left, Top}]], {{{{0.9999999999999999, 0.}, {0., 
       0.9999999999999982}}, {183.7155751139985, 7.645874120490092}}}]}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesLabel->{
    FormBox["\"B(G)\"", TraditionalForm], 
    FormBox[
    "\"E/\\!\\(\\*SubscriptBox[\\(\[Mu]\\), \\(B\\)]\\)h(MHz)\"", 
     TraditionalForm]},
  AxesOrigin->{0, 0},
  AxesStyle->Arrowheads[Automatic],
  ImagePadding->{{29.428571, 39.}, {1.1, 20.}},
  ImageSize->{607., Automatic},
  LabelStyle->Directive[Bold, Larger],
  PlotRange->{{-20.833333, 1020.833333}, {-663.28634, 961.495625}},
  PlotRangeClipping->True,
  PlotRangePadding->Automatic,
  Ticks->{{{0, 
      FormBox["0", TraditionalForm]}, {200, 
      FormBox["200", TraditionalForm]}, {400, 
      FormBox["400", TraditionalForm]}, {600, 
      FormBox["600", TraditionalForm]}, {800, 
      FormBox["800", TraditionalForm]}, {1000, 
      FormBox["1000", TraditionalForm]}}, {{-600, 
      FormBox[
       RowBox[{"-", "600"}], TraditionalForm]}, {-400, 
      FormBox[
       RowBox[{"-", "400"}], TraditionalForm]}, {-200, 
      FormBox[
       RowBox[{"-", "200"}], TraditionalForm]}, {0, 
      FormBox["0", TraditionalForm]}, {200, 
      FormBox["200", TraditionalForm]}, {400, 
      FormBox["400", TraditionalForm]}, {600, 
      FormBox["600", TraditionalForm]}, {800, 
      FormBox["800", TraditionalForm]}}}]], "Output",
 CellChangeTimes->{3.521480503929873*^9},
 ImageCache->GraphicsData["CompressedBitmap", "\<\
eJzVnQl4XFXZ+MfSHRAEBBU+URHZNIgfivqJMoqgLEb2baCUJaKADChL2NSw
lIAiEZUAQioQAcNiWAyLoRAohCUiwRLBAGEJtKGkdKCMEPH8z++c971z7s29
M2kpPs8/PoZmlnPf8+7bec+us398xOFHz/7x9w+d/bEdj5tdPOL7h/7oYzsc
c5x9aZX35XKTZuVy7zvkY7nJ9t8ml4v9in5m8yuX29T9ZxUTvBd86Av/v35o
srz70kul6N0tJ/LF3BTz+utvmbvnPW3OO/ces89e7ebI7/8pt1WN7465f043
//73O+axx142l/3uYfP9791ovr3j5eakE7rM9dc9bp57bsnn/DJryTJmrGRG
hofNaGksNzn22ogpjZnU16ZkgfAvAeGl4aXmTzcuMKc03m52+labOezQ683F
rQ+av/512IyNvfN5D8IH3H9WM0M9rW6pfKHg/lto6TZlWXe0v93U2dfqC3n7
Xt509I9OEhylvBVBOw6yNwQyENtzzzPmFz/vMfvu/Qezx25XmrPPmmfuvOOf
5rXXyl/ykK3p/vNBMzbU4ZbK1TWZEftSf2u9+7vYNWRMqc8U3HutFtqyac3D
3gXTB7Wz3wOV6SC+FtDv739faOa2PQLdzbd2uMz8+Ee3mmuvecw8/fSr28ZB
VJBy9a0Oaf2tHom5hg6zoKPB/buusdu+UzZt9TkPfsegGcx+LxvEVwXEl18u
mZtvGjCnnXqH2fnbbWb2rA7z2988YB5+6AXz1lv/3s6DOFWWKfV7+iL8U9zv
9Sy4baZk/9de8I/N5T34fS2ynfzPzdyGOvfv+tY+93TdWr75HtOR+V5vNviL
BPxly9428+8bMhf88j5zwH7XmPpdf2/OOuMuc9ttT5pXX122fRz88lCXKRYa
TLFYtPzF7w+bhoaCKTo2HTNdjXVCgTb716hprssJKHdF26tviYOZy19gLsl8
r9WuYnKOz6dEu3jBgTPDvPPOf8zAE4vMFb/vM0cf1Wl2/OZl5thjbjZ/aH/U
PPXUK+Y///lPbseQR9at8EiuzuQFulxd0fSNliK6p0H468z3HISTsvD8vOB5
0cLXza23DJifnH6nY5NZB/7R/PpX95ve3ufNv/41tnOck0sDbcomprlrwIyM
jIgaGDPdjXkhd797pac5LzieX+W9KqzwjID45ptvm/vnP2daLphvDjzgWvOd
XX5vzmjqNn++9R9m8SvL6kMQpzhQlNx1xU5UridT7v1mqLMor3c5gWoV5DVa
XVHlvUwInxJ6W3qaf/xjxFx5xV/NMUff5Oh9zA9vNldd+ah58h+e3rt7ML1C
Xcf+GjHtipXmLmjlf8r9opZaArXUYAbKVd/LBHFAkPjKK284hDX9rNvsuvNc
c2DhWvOrlvnmgfufM+Xy2N4eurXdf2aa4f4u01jvkdjUOehWKg12mnoQlOf1
etM1WFY1n/JWtpp/XCCy3OW4DG6D63bZaa7jwlstlIsWvb6/h+iD7j/T7N6t
KiqPmcpP2YyOjsJ9FfsXvJZp/x4NaIYsIpPIJjRDVpFZZNfKcO5AD0OmOX9E
trJ48TJzW9eTTkHBnSgsFBcKzCqyLeX7WA39fi0vozfA0kMPvmB+8+sHzMFW
hSOjp1uVjmpfuPD1z7qPTTYvPP+aueH6v5uTG2/jY7X8kPmy+j//udgi4G/m
uOItDgFH/aDT2rQ+s2CBQ8CW8rFS6V8xV2evPdrNuVbDz7vrafPGG2/Veto9
sozV2+b2259yaNqt/gqz/35Xm1+ef6+5795nLZre0qeBpsf7xTk64kZnXI//
8Z/NdR2Pm6GhJZ+v8bTuAHMYO4zebMHcqafcbjr/tADj+Fn52Isvih908u3u
I4fOvs60XtRr/to3bN5++99frPG0O2SZpwdfNddc/Zj50XG3OkziFeAd4CXY
Denekr7Nbt+90px15l3mDosW69t8pcbT/izLjI6+6b7CV3e3S+y3z9Xm/J/f
a3p6xmESANouf8T8YLybsl2Np90ky1h3wTz88Avmot8+YA45uMO5i6ALtFk3
UjGJRwlyQbLD5CHXua/wVbvEN2o87UbF5NOvOgABFEwCOBv4++MxTNptmnvt
ds//xb1m/32vNt/9zhWOsWAwy2g71nhaRwomlSchDkSyrK1Pw6I/YYUC4UBI
AOy4Y28xV//hb2ZwcPHONZ529ThM9jpGCzE5XMEkvttNNz3hBB1MgnQUAIrA
svV3ajztqhRMQnowefllDzvhSmASEQxdLewrGs1qtt1rPG1uApO46vAk7K2Y
tGzvnxb3jY46stMBhvoJfaO9ajzydzXQeWOcMa2edPryJ6dVfBzQ+aD3cfar
8bSLlxedFc+1sP81ziBgdbv+/CTuSi2b8psJMGYKOnE9xrmaT3p0HlzjkS3j
0DlezodT0Hl6HJ3iMh5W42nnB+gMNWamnHt0tiTQKd7fETWedq4sE9oeVAXo
VI0ZyXkcnT886qYIne1XVdDpMwuTI3RhYOwmalnBswUStehpdimNaQMsX/ir
+cq027iPTTNDz46aP17bb463TEkWQV0Yi92a2Ygz5FFWgTlKoNAqXsA425XF
2EKJbeRjmLh5OAvWQdhz96vM3nu2m5+f1+OUtVU1W9cA6ieyjPpUZ1pNxJPQ
8Tz53tDEzYgUM3sOCRby/xdkST67wCnxStR+wvHWsbjucfP880tqmfpTAgI6
x/XC+83BB/0xcslu6nwidCxUiavW4aP4uqLEFV0jI2/EArCDJU7ve+RF8jD/
VwOoEwUPzp190ruzSkd44fdz+xx+cGdDQqLw8b1Che801OKIkPA3wLJPuI+w
4Wc/+YvS+2s1IPuxLBNFHj/9iyMkrAMhCeki53hGQBy1C5eLXfhbZBcUsiTT
w7BsVPz2r9eArCjL2LjHxT/EQQfZeAj0Q4Zbbh4gLo78mpdKjraaSYFCaj4s
jhQonGT4Hsd4zz083+Mw33P3MzDsDjWAOirAw8CAjyWLlpF32P4yF1PyN6+D
ByWkVVxOgaHIkA8IibyQJAkICW+oG+gd6ss933e4bONONSD7viwTaiSCtYMk
hEQWLCpjTufj/mkQEk5Ex6NhrKb5Ygrfw1moQgzPI5bvLVZ3rQHU4bIMyYHQ
eQmVkuW80Mu/Ubx8OAbzFvimiinVzaksv3jZbh6oDwtQK5yDnS20rqQRvVdZ
4fmKLxTSmhgMVUoMRuSAq4WPsGTJm4pWROPaaytOSkI09vQ70Dg/SvvVtxrN
gK+sdO5BAtGwJJo1LJg9q+LMWtTr/qyuM4/97aUoJQ4uiPrYzLPPjur+klIG
KkCJ+Ov7hvtby5T6WsNs2IomhDOzK/sHxEHOgcSFddZhw3GTYES50AqbS/Gf
dGKX29/hknMXXa9ciAqoIq8Fv8c1lONMlCG0xOD3Gi7P+beVnVn+jLwxVioZ
ScTkPhVSLyhoOOoRaV7rIs3PylehXvdfBk3zOXfnJkE/+9o5c+52r9nwN6dU
xmaghdV2JpTDLI+B7OT11Ch57alYZ+rq6mDdSYqgwlxz5crOXW/m/rm6JciA
aQaj9c2md6hkBtuLprnXZ/hGelsktys53oYOl6/6n4BFrgtY5LA4i6i0vP32
v12l5pKLHzQNh13vXHW+cp0vICkek/rMaUdrhyUWOTSOx+pZdCmtNPa4fUQ4
z7fGigQrIYu+qWibUm+zxbf/ihntNg2N3TnVRP1tRdNEhcf+DPZ0mYGSEbU8
HUZyDAVj4YCiJizDKZOpMD7zzKveibBKBk35vYYbzO8ufcj87dGXwLSi8Nkq
CtXq5waPQk3jW0BNiyVtc3/ZjGmyXFD0XqTxN3f/tIq8z+KqqVfes2xfaDSD
+lGXES+Y9oHyegH7wFEkuuAwOI3U4fXeE1YUEYNSddMYdB+r2nBpsENWlEOd
fLfq5N3H6eQfeBRFme/RHiuJReu4hOhZ4fpBpjR61ExNoMaYASuNrf0lRakx
w6Yp32B6LQetLRvSgEhTUGg0NBsaLhDCMJLTeBknUeJlRU+aOj/xhC6nzi2y
f+jR44u9a5uR7iZVZoIas6J1i2xN5XEzzZT7WmK4McOdpqG515RL5ZwiqL8l
b+rbHTPl3i9bcsGZdTJhDJxOnE8XTceTE7GgpJgILn2YnxvnD6ar/GPjWDKx
op44LytWOqmlz63BK4+avvYGp/wnCeao37QUms1Dnc2mtW/UA1S0ZGjpy60q
WyK+6H3gORf1aaAIfxAV2qBCpUwDpDMk0tUASdLioS4nn530TUWXH+8RpJ6d
GRs0jbJhrS2trApOhJeRAdNWtNzRokZxqlVcDaZt4BmrgIQ41oPqGRmbJhwR
5leIaohuCNsJ39PC1Pnzh3zdb3x49iX5WFJBa9QrHu9JHi/rqLhb/3y05GqW
uYoKWMFa0paCPYivtamy947kS0EaIJHHkcJbMvwFcs3jEf5RQqS0SCiQ6gOP
17en+h1nhk6fl2W0FqHRo9ZVXfT4SuS0qv9OigMNR/gLD0q6L6nliGW0aqNO
q9VyP60B1FayjOuMCcIA8ABlJXpUoNTkJB3uO7zDrbyRTK54pdLrlIq1gWfU
AKpOliGoYh+06CT9drtMGMI8+uiwufSSh5w3oYUrcYIVqKpB5ivL5tQAanNZ
Ro3znLN9vp18AxxxV/cg6Em6OdCCyLfh8Buc14j3aGFXoIaGllSLG8+tAZTG
AeyNvAgBHsh2KeTG282NN/zdvPDCawpUlI1NOBbzvGOhQI1jdPuxgNHPrwHU
JwLZQoaQJWQKEpKZgFUlx5kLbXqU3JMNELmKTVfIqoVoltt/VQOyDWWZMEdI
SgU1h7pD7b35Ziw3pjkh+gpCNSel2lyM5S0nZdjR39SAbH1ZBuVAREvJgeqi
KgesTZBX0dyYVqo0J0Ryz2q3aiwf1EQurgGUuq0qYLjpRzT4trnjtZ45+Gqo
HLTICuxRWqzLPe3L8rFqnr3F6O9qALWOLOPKQnYZyM8ykYD1DScjNlUOwK76
UWD/cgA7io2AJUW3z60B1JqyDD4Fepxts/19RXJEwBRTVK2BXWOgEPZAOWR6
sD5cuKoGUKvJMqFBh1Hg+J/+5E7HQJaR1pPvh/mFdcP9dFUcTsjKfiQSUezB
/FXyBlfXAHS6yBt8RlXPpTAtV+ClqDFGDpE3D9mKBfvVEHJ6xUHUXYU9IHzM
SU8liu+osSv1RFDx9IhoaoGKKciRgoSX/OUPu5cHadVETxPc9nM31NjR+2QZ
zEhYcqYvhbKTRPofcR9bw5T621zaEoe/T9KcEwyYc9MC5BEdY8xQOwnkheJL
V0yG+N6UvbF/ywoktPEN8REJGsKatrWgG7mPLVdUOymBLXUYwJYm35YsKesW
QmHXppFA2P+cvYV/CSdoBQD7inMfljDUyfcOw0Qi0Onm4Z9vZ7760x4fR82q
1KXFqfg/+ViW8IuXdns24MsSRCYVokQmuBciZ8eDNt6y8eAvDzjHXH3haebg
n82z5vkGs/WGObPOV3/pghsx06FIPyjNbyki3Z0N61JZgRD8duF9OqRx/+C6
v/zln1DTJ2tXC2O02Pa23WI7s+1uvzb7ff6TEqftT5yWFFA1DLhLrjPOC+jd
2fBp/7HqNrwBLXNrciTyBFeLdY2M30YpGVbFim1pcubL+fdlw7dImFQz1nRw
UAzWwrEGXMlIFI9GZRI9rU5hwICxOtv3bkxKTm82UC/JCmqPTwwCDXJ0lKks
y2wZwN4fqFoehKp1KtTnJXNpUgHcCal4OBuoWIuwtI66TpR9fScKvsTSpePy
qQo7eUViLXIWFnaFpxrnWw31aDY82g+sLpKLW/fzrinxE7tcWCnbLlr0epRW
cR0f+14duUAW7K8kOD0yRXFO78+GR7t/2ZEmU8nFayyAZ0cmMaziATtuNV1r
Wq7EBaKuai3+V4KPKXujphNm5IlsoJ4QoLQvQsvILvVmtwa7E19bFsptGWwA
D8kVEw6/ISq9EXPTIRqyU8wVTPD4C8+/9lQ2ZNr3SzCtljTKJ1hmSOkH0EzR
scfcHOu4khR9TtGVVS4SHn86G6hHgxVcQpPWVGsbQTjIv/POf6KilKfUhQJ2
7elAKaDoli17S+GJwh3h8VjZZfGy57LheTiFT8gHhq5y0IplTYUDWx0gtCcm
HbCtMG2bxeM/qPC4Je6LHp53U9Z+IGAldo7gHy6FBWWlZEVbwzTaUOjrD/to
Xnxx6bbBx+ZlR0QLPfDZ1dBppq3fO31p5evlLW3fKxtVHwc0ass/8oVcSJkg
Jl9owYqCuMyFrTSPao+Ssk6afJ1UsSGL/W7XFMjGhrtNXiqfq0hps6F9YKUe
fJonu8C6oc5C+6QOEllu67hGO1bsEE77hIVv0gm1j9K3htu2xO9Yq0flgXYH
XVvvkBkdGTZ9nU029Gpf0XNUaRv+iwBGzwi8SPLQdaDtV7F7NrrYMgUvJwV4
IVqTJG+016RiiLl9i5e97vda+1BW5We4q9FRr3fE/z0y9Ly5diUWtm9TTbPY
Bw9oFyQQbYOyBHJracMecHCGrorh7C6Hs69mKKTo4IU3um/G8TC+Lr1KWJcW
uNc2va4qWG/9WOP0wMqpSWsXfExdSTkCJxB78NxzS0KVrIhCHePUgqg/+2Mt
/min3dnYmF1Rj1AaTXpMDR5WJY582yNobdm45QIf4OZbbBjyrirNubRS85+E
1TU5inhq2VgVGeecQp9ZLVgauqJTHFaqy32u8FRoajbNTS2mb2QsPYXyKUmh
bHaC2SHuV+f+47ERHVKLDqUZt7xXkHWma7i8Ug+pXSdY0cweJQv1xgl7qXLi
pYemgOge7xeleVhgHxWDlTIPpdYxV0J0P6NdJm/VXHm02xx0zK2RwvzqZ3Yw
W23/W2dvOy+9yjw+6vII0jAgKJls+uxWip0+bzPa16ZdMC19oyu1tnyN7JL4
BCOmvhvGkYIINRMJByKM0GVKLQLsaRyGQSV5oNjzecj0RI6LJ7quMOvnjjT7
Fn5v6tbfxRQjlbo0SuS4D08O0bKKtCJQ9cxLZ9CaToH0Va8YL+9BvKtkq3rk
TC2oNiJiDfAgrWDnwhBP/QtFIWljfHSJBnNfk88+K+2wPyr+wXxu853N2vbZ
/7PrhebvVpsuuMrlhXJpiSEHnQdY7OsUM9LXrh6FE5qW7qFctSLx8haQfy/q
4VmJArQrECcXVZEwrrhDyAX+Y2hcKSSI0y1oeH+qzsR/Jifw2sInTHM+b7rE
TAZpprQ+h1CGolP4VhxLoy4jkVolnmjl+DLBAEf2MJWErphKiluAjvEIyq+U
F6gqaciBLmVX6FYbxvrNrxt5XHhYKbkH/+xSv+no8lnO4Q6r9qO8W2YvQ8gi
afGKno2hNxgLp2kc8I/VI28QxOR0t5E0QXXh+5DGJ2Er8cp28jF1CcPzT2g4
cQknC88BZ29r0eTzXlG3RXye2YdQaz+/CSAgsDrn7HmOjzROh2BBHRMXkdCd
HAPbJlYHBZQqrLHX/aTlPM6snLCaKYCMlUaNuASRXKW1Frg/JmdvQs/z4IpQ
IaZ8SvaDx4JS8qY2Cg8PKkAnaivQDdeODbmcxPDSvHyM/A4pDXq5UxIl7tHr
ZwP1C/d7hstCk3HGK1S/gGQujEr6K4wQHRW6KlSg8oO4cFTGio9CpoLPPqHC
PnryzCcD3fM3zIasWSAjFUnxnLySxqOkSlGtmgZRyEgukX1FYLU8ClMLahWy
LKm83mdL3PM3yobsrACyeZLxUpw1nnSbMyTJqDoNMoiO32VJ+PWJiZh7/qey
IftZNWpaTeUgezLuESpkFPqrQBa2EGhRjBhJhMU9f/NsyE4TyMjowPw8jUxb
SM0kZFSx8Rccn1nmUcigpoXsG1UkIDiW4Z7/mWzIGgUy8qnolvMCscQMouWT
+UIUDA0syCbKhfwreohqkOUzhSw0fVkSUOU02PECmdVsjil4GrFLyNXYoRAy
UmFoQ7LCdNjyWP7Na9bgKGQxCThiXL7QPb/Kie5jg6exZ6Sf/Bx6Ch3F06xR
CWNxRJXVIaCzq1ZxsCHQODy8NLd9DQmQ2rd7fpUjYXpehw1SL4Dj0WOwK9wN
L2ERrQaNOXUkZZ03c2KXS3/i+MAJSIaVkAi8pM1IE4Mqx8WPkEfiXpMuRVMr
39KBgSrB6loxicAj2ED+yT2pz0k2hqOXcJdVQ7lvCngugreycHxK2lxl4WvZ
4B0mj6TNhOQRbi1JAEqFRAoIP/2PlrEj8GByzh8SfaJM+SwZYdJqJI/tWhF4
4wTCMgECcW8gEFUOpB8sj4RHqEThcIEJHexBsIIXHua8cIFQOGCWz7qDzcfe
4gIZAhw8dgWvmremUlHlBPsB7vdMh2iUEi4V0oDMok2cBrbEgdcsz9XJx7HS
SAcKF0FCbKmMUJZDLUI7C9kOCQHR5rk0E1Hl7Ng+ghcYmf3DHZRFWAqFTBma
5a34xjKlhNLkDckNISCYYiw7CtoqKBmcMzEBqXJSfg95JHYCTqFOSXL2m9/4
nVNUROhkW2B6BQ+MYO3o19DPwoFwJNy6ZEk59y0Br5q7pAKyWzZ43xGaoTL4
CpzB7tDskBjzT1s1IbKVcSUxjOU+bm0JdgISowThCE5SyscVyHEhU4rdqHIY
fyfBC14AuII72CeSSVkH24sOtCxdiblrVBc+KGtCQsBAutEMRH6sSRYMEsMK
28n3S6MjUVPvZMGEvlZV1F54rV6WKNuPDw+PxCK5csm+NjLqfO601/aOfXcY
333C89lasrH6zZD0Tyxy1teR3uowhAchQqmggGz8q9HDyqx8rCEgIOZ0LnT8
sd+xEwoGEEhZkd4imWNB8OntD1byIj4Y8/spD9rIm/xiwT2m0NprojE+9r3T
/8++95ldzXr2vfW3ONUcHNcyue+6tddx2+ts8kOyGho8qG2a9bYr9rg8Zp0p
uGc1m8EoBZj6nhd/ad+SGLGhQZavPtyuKuYuyKZrXjgbL4sgHy1CSgctgm5F
8JAWFOJ7VeCZKTDQ1I1hI4+CVAADeRVgQLpIq3qHfC27Xq9L7bAXn5Ytm85i
zm25b4xUgs8SNrQ+apXxPPP1zXhvM3PET7pN+ymz3HtNPSN7CJP0t2nFgezC
gDBM3mXtR3qafYKxe9T1nrlkX4Mb4lXtPRmu9UHT3SQzq7qHHc51VB1VoBVF
2S+zKfoV1TVWjVLqQcfgECEieOv4zmR2KXlZ5+qDwsoruYY1RaBYsuRN5wfh
nAAFBhGlTmyBqcCwWii+IRtROlRYS5Kfz0gxwar3c654zBx78LH+cx//obnk
wgvNJu49nySNjrj5qpS3Z+u6wydF4ZimHjhmyB9Gsf9vsSZb88it/ayhOoMM
/ZIq741Fy3PILu+5RhN6vc2e0pQ1quCq2ntVCL2NoBh3FcUEOiEu9hJic7gJ
FxYnwBpDnwb5n5VZnHPmGDeKOAOPTK0BLiY9xTza2kzxPyZb1vdJsdjBV0/h
I75/nFB+a3PsnB7zl7lnyd/15q4HWqN/Q+Fyf+Xv3lKFwqW+SCd4SlX+brl3
XuXffcvxXt+oyrHyJkWIkSjpbxHRcn8VJFWvblYh7+eEvPR5ISXEZzjIVC/1
zBptHmhtq50/7j7+oRWqN+5yXq8jY/OhO/v31jvU5CWQwQUlDCRfa13EXQTX
fsLpMaYLL6b1SvNxQcb21hu69CfHZZCrYG67uTnzvb50UjZbEptST1QBaH24
JzLo48h1/7zs95SUPh3u7W9FzbT2Pf9uirNVzn349MuqThdSaGduD44LUTae
H5494Sw2Dg+dLNDG7ju1q6j3X7Cfh2KLE83Om/r31t3kdEe6E/fe0b/3xV+Y
xXbNemERcl7kUUky5Lf8kslt3mS9m2vMThVEmVEtcabQaV539nsRDUHyiM40
jZBc39Rl1X3fu6bf2JBpEbfSK5EPWPM6Ysy7rDNXIeKmQkSSX6Q9UW84vSSm
UXlE4DguyAppKYi4iWiOrOLvlQ8vNL844IvuORvvcJEzjNt8alP/93dazTn7
bOPBvegx99Ww+OsFcYOo/I0qOFC7N36mafxFps3apObOTtMQEDeaQJFCwHt7
st+zxFVlqKC4EsbQsI1Cox72FdWzkcM0UHECTL6x2TRCtbpG019a8YGuVRTt
J4SyOExkpchE4HJS+FWniSQtjhSpmpdfLolITzb3nfE1c+CFjzhxOqvYqDXs
rba/xBy5527uMRvtNde8NLxowjXsb7ul47G6DtEisSsHL329aJ0YwpW+ZkQd
9IRHVGg35WrvGaGvDQ7LAxHLWD/ZRxdrxAQs7gxZSzxa7b2KPzzY3iBPbHNS
MSR/N1hPaEUL/3sIXR9++GEbXPtjC1/KJvkG7vdqTnioVZDGIbtHegeBJq5H
gxLXUxbB/lr2+LT7mm+YIAgmMOJrOLYkNXbc7iSzln3MhzfaKvBtdn03pfsw
d0gdiA6eZDLdBrv+vMtagdoWTpCqqYZFiuuW3qrv7SlcMDbcE3FBa8+Qjiwe
7dWoZ8QJseOnxi4XEVV5L2IAic201BsFRBziWcHz8p4Bppi99trLrLnmmmaP
PfYwF198sXn22WdzG0UGqWS6mvLEqnIcfhVnAST6z1Upwa4rDEMCCE+J5Cae
EQxD/mH7r1/qQlUSnph3Qp6FC1//tJBl6dKyO4ZEup88Anl2KOgi3EOuc3VX
vkb3AN1q5OJSmh5WtOdBq1iuj1PSTv64X2XC/wvPv7a6sHePhC0t2s5ira0r
Wdd5fVps76+UglPe21sUKvju7WiRXRRM15A3gv3tnv5upHih1QyPVUrLae9F
aRHntRUdNgoN4kQ3tJohSd0sL1r2FELfddddKjQitpPNxhtvbI488kjTaU1n
qVT6qKpF9aj9oblVFAv2j5GhQTMwMGAGh0i6jQk38ZVRz6leCCZlM9kaIl5E
VfSXkASFKyje68lS8qZ4/iSfiQhgNFwSS9rN5esoNTwQjiPwdVQGxoOvsgSl
DGpPGBPsGbl9+/VpkZQsf0uJ9hSEniWOSKJ8tWbiERWhI185qrO0K3nN4DU/
EHWq6zeIj9wuWTBK2tQif7q/NBVqxjykpfCqiho70u9utNFGEW/4BOYUM2XK
FLPtttuaM844wzz44IMWee8Erd5l09lYH+MlbQXJFxpNR+9Q1Nvj3Jy863pa
RRA42N0q1jxvmltbvesD29YXTWf/SNQwZaMCJ22d2giVylDThK1I2pJcgww0
VXBUGR8REwdXEE5CKpIypLapgJCUt2ort1lyDav9UGO6BsEL9RrWoIZHUp81
OC6KN7X4lWVSGppe1VelnYCfb8s+Tj311Ajx0wWRa621llPwl156qQ15n/OD
X1azRkzaaWyMBOXLgx1RcO4aDDWR5oXWI2yGxb/4IUHjHp1ojdE9DHqSzgux
z+40miE96yk4X8t9mjolkkRajRomKREsBDjl/ApFcqwEZVhiBUqx1DQpumMa
rGXx4cIHXMSPTNOyj83HC6SgRMyI7GP/sRxkW+hKRD/oUnyH8uksQbmWRLXi
k/Ai3ZZ3EZTff//9EcpXE5Rvsskm5uijjzY333yz1Utv+FTtqpU8XTSjT/Hj
g6nn+1rUFa/gcKQ7IktT9/B41LqPV162zn5T3in7zqGxGMbf7z78tW0vNt/I
X2p22Qkf/SpzmDWkJ/z4Vqcafz/3EZcYWfD3ha6/C7ttKeQHmq3umBmbTI8F
3Q34d3hSCAdaFQam/ISdRkj23+9qu40dtr/Msg2OHvUk8l0wMp+HSvSW0kVB
4HeIYD/ptUH8wGtziPuuYJ9rKxT7axgfNM+YMcMcf/zxaCU50rxqJWaNUF/x
1OHwVyRgszFuNBgojKjUqo+NDpmutkbRUtPcxR7dg9GVD9FzmntHc4L9/xG9
goqxvz4kPLLpppuao446ytx4441myZIlM5OA5ptN32C/aWushIy4AqVxgK5q
AVWZdDGDADpourt7TG9fn+mz/+/ttf8eGKnMghoPaJoy9OfbN3DWFXZAmWEm
ceRRdhw2o+qPScR0QjeqEZTPYSX9L7VW3oOG5NfJ6KAUcayIJWA37CAT36zN
+0oKKFsLe1C6VXOZUszeLOWrh03wtYK8dvbZZ49To+uvv7456KCDzBVXXGH1
zIvvF4mL6GVtT2NjYZJYu+YeX7YoqUhH5Aq/UiDImR7IbpdQu32wXIUoaaBr
C2BYSz9QD6yJtXj11WWfmeBy1bCz+eabJ6z7ZBc97LbbbubXv/41/pzvtH1/
IHZtPs7p0URmnfGZJzEywVmYoS7JCKwCGqKn6xHy0b4O0zUQHpxRTdhkzZBZ
TrR5fEyL5Q30ABg1fqvxZfj2iuHMG/EZobfs/j99+nSz/fbbmzlz5piHHnrI
eUO+qDRlnJkoD7SJvpkZHabwxY8606OqJ6jXNlQOQ5FNbMJy9I5Gkq/XbFlr
Us0NStvNZkKDGnH11u8aYVPMrrvuarbZZhsrU41Wj3VbO1S2qtMYn4YYM52R
++KvshrqbAw4S13dspWoXGVmrP0Z7lYOtP5LpLd9iJuL4n/jQjQwl2/prRLh
/lwQkmxNcEM8E92hh8v3X3vttej7Hxb2CBzgaBf5eknMNTTixYrDvYbps9q+
IMk6fkYHukxRXIGGYoMLHPMNTe7WH2WXvtYG09gxkKvSatwsWwmjkaR6xQPg
5yL3WcKKUauOo1ZnIy3O07KfcpY8RY/PpTm19KDwc032Mk2yTFJsOayTdNSq
DFWZLsw2NuYZZszFSGUXiWq/Yg1ed9+7sdYjppuBLs93zR29pjQ2YIr1Os1v
BPW1SorGOyxkLusnUQ1OSUC4D99cCwIMeck011kPQZ7Q01SsHKKw6qNY3+yT
AqVB09U9cGgGP5B5CW7Vcd+uMklkurCKV9P1pifKeLdSqY1is6FOU5CZOgcH
PJIV+CiP3FHrydPGPdmA/QaXRY10IqM6C768IWZOeOtaf5dCVhBQZbrHdN2Z
Rbs8PvIsuxqLpmekXAnJXcqvYAbHTG5f+XYa39G8eG/Ad/dkP97LoPcqRof7
rLPrqr4KAYa4qWu+aW5sc2w4ZvHvUpoWyj0DvtPbm7L4bv5EICibge42u8EY
BJR0GhrazfM9LVGAU2jpcemN3RK8pweKEzc6uedUmcWhPtpYWVh+zIl2fQ3+
klHf7huPZK+uU9H19pNqfFJlFoYOHld6E0HppTs0oIb0fjx7mb1rEE0m7LgP
D2Qvs4di3sZkJCP0poQ0zFeZEJGGYh2foIMpFcXPZC+zSw0UyzlL9+EqoxjC
HkkVqSwUD2cvo/3cabeaRXIhKF6UvYyeKBmnWBXF/tpW9+HF2cuEB9FracnX
spfRMUGK4vAcd5KLX89eRi9myUKxvz/Po7icvcznZBly7nEuHo/isexlwnMq
4c2pIRcriv+TvcwWtVB8WyUD536qeIqbJvBcTVu4n6nZa30yBdlUwdP42f34
5MK7GgvyMXlmNaNA+i368cr3vzbNQ6fuQ/Jaisv9+GOy/9X5GzrWPslP0TVt
gVZ0Pz4i/G9OzPAlu2nV2DRXgc9vKBrl/V5PsFhL8Kd3T5xz9rxMPe5+fMU6
Gq7w3kyV0BGQScnQixzojFCd5X4+FofqvR75oDPMq5l0VYbuR44x/reHMOh8
RicdD/i7nMJLgsdJxyYhnP+1yQiTBcxQQigQaugZ+iTuZ/MQzPdwUsGHQzAr
MpLi6yxd+i/XVgdXAi4VJ4ro2BK6M/AVaXZmO1Ss4BJ0VcsF8y3IdhWLBJo8
qBlwMMQ+YxIxscU2ROO8DRkDkiHk0DiQxDlfCEgTGOlJcsecEebEMqCS/6+g
bIZH2Xs3yeAjbq1jju40u9vQ6hv5S1w/AqHtEQ03uMMp2FPKRVSfqNRxzomD
QlShOHRCUym4Zbw/3SzgiXMUHM2BLbCHFo+rIHK5DZ0XAg445YhC4FQPwSUo
5gQI+KIRDhJx2h4hJalBHpIMjB4W+vp2lzjhhZyAA/dxooSBCxy1QsAhMfkC
6jScu3Ao9d09K2EEgqtxuTLSdl+92P13R2sf9tvnD+ZoCyuCetnvHnK0BoZX
Xnnjk6JHKCEAEhxH6ofSAGhAX8JF6Eqq7HArFSrkHkpwQoVjlbASpSYSUXBu
tLWYW7qOAw9djB8N58468FonoEd870ZXfjrXBlj43LjuPAsKQ11QCVfTEU4p
g/N1b775tl92TU6EuZfoHQDLcDc1RI5X7itdKcTpUIxGgbBMqU5iFXfe8+y6
Ti75ml4hgQZE9tCIr7/+L9dRjO+AjHJYjcoxs+t4PNVSHg9fwoc43QTqFhta
kEYzcbzRFaSDovaRQVEbMSDi5j1AodbDdA4HaJX4SKcT8wyITBsFWlGPTyIW
Vmt6bfV+364z8obTPogFFQtoDatDE+JF6sD0jBKScxjO0sM75as7duL0N9Um
JAgpAHKHCEtWBJV8CdJGpZJLqRycz2bvYIbsILqR2EojtIVNcDZQqEuXlqcK
CFgqCqHoTciNTsCqsmF2wck+zhIAItkkBuB8WoQIa8yZK/QEXAcB8BjwBQGd
1mYUBqVpFCQ/T2ZDvrpAjmCEk6FxRIKbbTUXCO7hDEaPoLWQBxqrQR4yB0sw
PhWusyKsI2g5YQnQaC7yFHoKD2VJWy+bpf8GJtVBElVyFjriHO8DL4ShQnr5
r96uYvG0qjzd9R1aihPZYmNoIIRnQRlhK1+HQtJ0rw3ksDvEhEJIC5TRq4BI
5NKVhqpiupuD66/ZEOukeAQ6KaXuAkWLLwvm6vJo2BvDCn/CyvpoiI3GpmWE
6ieMoeDC17RDcKoRHDN7EbJAHngcKUJ6GTHkgHowG1ydtq8SqXfhqkTKdRZr
yKM5E8PSGGxUGJzAo9HKiBIKA6PNLQsKLpoW3qYZFJ6l8M+hUTRqKrhVBvrq
jQXhheAp4remPJrmEcQDcCEEGNKT5JzIu92f8XCzDhRcuBLPLQku32UNDBKF
HI54O6DmZYO7YYbMgS6Mmsic92Jmul2BCTwr7BBHUrBL4Ykjy1d1AaT0oYB0
2FT5gFlj/O2IIS3zDp4qqfBPhIL217igoelF0PTGIYrwyUNw+Ed8FHqCdIsg
PanMYAIECNyBQ0gPh9FlgwGmUqLHuKtUCvTiEWQL0mXIlhfBGU59ubOXlopg
XHGDzubrL76o0xr8qT7O2KLqMDG6IRQ2B2I5GKvJgc5sCLX8mSVOYuA+KE9l
RWwn/Anq0JJsCLOAcpVTfHokHbUFW0JciOOOr1sdhV1EqVpl4kG5PhvCzyQl
KDBgenGelaB15ZHoJ5bmEXp2FByim3DPrLsW4RBpA2IgR5exE7p66K+C8phn
DSOrVO6ikls57Ej0JTfNayFQ+DdJger3AuWhn+zwi6xSALT4nYTZty+DajcD
4YlFlVs7/FldLAfG9mAZAAHxED18OuZTOFiq3IGhd1+56xNzBdPS0mRaOvrs
Y8YV9FIreh9Nk8NDxhm8D8lj8JZhZZ1DoQP18Ii8P1iZMofZwKtGZtEoOmDs
PJm3gDg4IObW2t7qrl6ipOlprDdtNsasUS2MaDfOMhZi0vuhAFziQMjKUGsU
IVRB5dMIyPwU5Twdtoer5IZdWDnC1T09GHahnHdp9u5mCtt0F+vcUdYqFUhN
1uqTY4JukYsKt4L+YVlXB1zDiAyOYd+oF3CAD4d9tEspqYh57xCyHuzGi1zu
oohwFIkD+aJaYjTNhsadptEdencNfzWLm5rSRkFgcNTE7hY3sR8RUDGfOCkE
OrThwVVIJQhA9MKBmHp0Gu7UW0Po4SSsdYP71AG/sNa2fHg6aMHOF7smVDQN
hywl3d9Ac+i2sEY6KQT50yvaEB7Cy+RUS/wxeMCPyLncC5YNWaGilVcPf5XD
UipYA50dPpdjhkwD3TtSkq5WjdWSiN6YlKEz1g8ECyrwMZwbtSIkGHBFQ50B
3+JQo75PC2YscbCCZRkd4OA7r/bWzEiPKebzPk9TaK9MNq5S5tWiUQ1vWrem
42ew4kihDt3E1yOQYWbLZ+WzaHt3vOwMP22LGAHDcH0wm86Bd/bEmFG74/V8
QqKkHN4bkeYZOIUx+OoGAh1OMz4HqQa9zY1wF41AsEj7t+5kocwYc6P/9rs6
NjFOxvx4kJuyd6L1dKSepABSjzgnpF7B01GdbhBWox+ExXizc4PhVgoeokT8
Sx6MPARbYUtsbYEfWuThOD0bvL0ypDe0+xazCh5IxvPFRdDRYOgw0h5YeIux
CDxcWXgDHoFXWJa8GgR6XGbSOiBOzgZPOzKSVlvnIJO8sM9U447TDmj4+LAd
EjVHR4jpXaFeXaKBUY/4XOgguJosHg52lN46IRsybVUhaQRhzkwXIIWM0Wt/
0tFr3NW3l59xCWTWKClkqkKIsXXIPfZpHGTHZUM2q5pAFCOB2FA+hjMPZDiT
Ic7wXKKhox4yfLU0yPpDav4wGzLtawotILKQCDIVMu64YFydjo4nhOdjiGQ0
LT0BmTV6GD/2yb7VULrnyxXK76YU+z0BjV7sLHGxWkF3oPwIbnVSK5KMg2+l
N9wBuoFYQJNYZFXI4iHIkZ6Re7I1WIxG20ed9akF3eWt5/4gQ+j0Fkdn9ha9
rmVpN1uXq0hOrgwhJpBCNVnpCIUOXwR1MFtcL7QVkZteFeSef0i4ybUqZ7+1
k3TFqsJp9aQfyg7CsBcRSMjwhrKDcPI0hEffcoKIMJjBXYQxofIjk62X0oE7
TAchr46ndED4VqYqtfo1XIf231aszpxaRvO6Y1o15SA9B5VLM3ldpxTCC6hO
f9fMW1H/O2hEhHHPMJfYrtMqk3Ldww8ItzvFbdcTqU5nrOS0epgrzDVXrsQS
9vECZlL7qCWGX6320Z3rTXzUPorJ2eEyfj28fBoG0hG7VK3I4+IGoSr48ZP8
ojvuXRzb2OPeiuRY7rh/F8XxSm38RIFNLTsTAVJUlW43nCCvIQSM4a5ikctG
wvtKb5VLoXaTO/DmiGImr8HPHvHtuk7Qupxp7i9XTvDLdt9F1T2t6H6qQJmp
vrzP8HHZOMkV6ImXjmGDzrgpKF8iS5RvOHn7RrnFGX1Ouo2khld13i31/XdR
44ivOdvwqSfc9ArPhUhj7J8G8pfqivg7pnXDpJrvFUWsdyOqaorPp62MgiXW
R+W565qs8nbXNd03VEkt7+x3re0oxL05LRvnvXVamZ0AZ8iWQx9H7/QN1Jgm
X3HSVDOFF4bJJUmqtMPrvlgl7boA9/wd47v1x4fq4rZ4BecCpO12ThXNNafi
N+lu9c42ArDoikr7sdvDmfj+xo3wzgi9YNJd6Bz6TTLiVb0O5pI1CvR6iiOl
3L+8dxqcJ9Cjr5IZSJIDoq90k04U7ce0pQZmJ3cqhlg3yeQLzDjOYdZVWu75
X/ObXNk33J8v4KoygpVSlJFesu1cjCdfcfwbXl+IcpL7MyNlxHnQ5O1mp+vd
kNIjXmW28a8ytAZLBc6PQqY3PbrbEo+s2IfwfpbPymP0Hjgb4Fjk7bn7VfY1
gh1hQA9DlanQen+AYiPppLhk/+CrGwloaPDkhTogL7w6UJGm0Y6O402wjXv+
1tmQ6U0NKol8NZREMgjW9dsoSaLgkkWnd7iaeDjSOyHV1cnCFLlLKx8K9M5n
syHTCzFUfNDoOjwhMPcK2SK5agKq693xRCb+xtDIaXdUt9YfAcQr0GwdUZ9e
+u6e/+lsyOYmRCAtnLAioFlsYqbr5H5VPuIuKrGBEWGxlWYlpBNsGXBPdoG9
ojJIqJH05WezbKCuSnA/ulK5H8Mo3K8sRtZILQN2RufZhRfVKWQ4AjgEpP/J
jagziMdk0a7hZ3hBt/s9Ixta3+c42bS5c2r1pq17gO9elJAT6kPIieYzxAoq
ZvUGvfBaQXfF5rVOTraSj+HdkXjWK1VACQwst4R7x2bFrux2b1bp1F5NcTOA
Q+xOF+Z+F4nc2+Pd9jl3q8iFjdlASgSKyMHceq9pkGhxiaxBf4LN3zk/7p5Y
OcOy/Hd5T2yXU/wB5bpW6fAsm77ewdzlgRijp1SMSWwEYqy7DW+VJXJNvVU2
/Zre8KpbYm9vvd7dPd/uzykT2LkLePKmqbnFNNkwjpBN7zRKS7YHlnJj+VjW
Jb+P+BqCCmN46TBqQi9KQUU+//wSn0JfrovA3ftVDnNW9ogMNDMQyIyN9pvW
9v5cu0CVZnOBUG46/GQK2bC54e3Kehm8bpT2XNJKOHrUhqnUYZHu8CeqPDtO
5KbwlDucavLy1FBiZd1e0z1QulqgUw1FUIWPmfDTlajhdddkVhLXXW8leMGI
E4bptVd6gex98/rN/LbDgkEo0DfzWqYJknJqpHYbm5tNc3OT891b+kY7AqjT
3HLRTLo5KBTeNY5bTmNALE+2RuzK3uL3Ws2nP7qp+cRXznOmRhytrHuZam7o
HgElzUmg5VC0i0KMj329ZPa04oO9pXps2dRDPDNmV/C/nCk+4RbTfnW/M8Xl
iqWrphzuk6eqAshwlTcWJtBz34QrKhywFvmaJ/w98ZFwkI2j6Ej8pyZZr47S
hEUVJu+tIrY4CyK2ijZcE17Ca9G6jNM53jEP7Sy+D64ovjuVTVKJsJKNq6sc
jtL7jUO7H0lVpeQVdvXoZZruWjGrHiq3w78ZmkQSscioRr+UMTE7mgF6Oxso
vQTayXCi0BVIgwIFb+HmKQvqJbgS5SjlSEthj1Ht6rNw5omEhOWtKufZ9Kbs
JK9jScfx+ozoCAnxjHq6x6qJTOha3HosLOy0j7ATDiTsZGOfKmf1nqjC43pr
s+VxRRK4hJPQhwcVKpc709kwPLw04qThpe4l3oKT+Ch86e/2e3tJNjxPJVgk
g7MVHndTdpdc8C1VLJCQcDc0aQxf4mYQK3KKCRUmnXm5V7KBeroae1eMxiby
Mb24Ud04lBl4laE04XQWOIko0RdZLnc8gYIbGlqyMBue5wJqhHoeWRrH2ZWY
CSaj/A8nUc0JL4IPYwW+jmhiD1gSC44lt6L5YjZQw7IC6eU09paoRClH0o8Y
N4xEcRqJAS3LRkfxgqBES5dY2/C6doo3agUsUoeyYVyYwu0YiET1VglJud0d
OZd6H7E5CtEfYH3b9wSsWOChfQx6MbgaDZfz+mFcygezN7Q4EJdYplUETsRF
N6Sd+MeKDKBX0C+YLSsD3hYuf3yxoSyPncG3TWoHl114qVSlZX1JKGFPxSUM
YDnBEEiYTgxBP2usTXgux+s8rDMnGiWomYyUyZl3udhFZ41JnLkgG/zXA4GE
OaIsjFVJgUAq+GR/aWxDsBAytX+3XHSi2fbke6KZY97nN5WfitMfHSGWkJEU
IshC19B0BXdbLn8sG+ZyhrySXw7kdRNhVDWPPz74CLPWJ091YuPCm642c9jZ
8zP99c3lMZrcReRQCQCLgiTJb+2m9NlHR5Jc2XvYjIYDJ1egPP62PB2B52xJ
hsB7DljNjJVHTV97g9luzv1u//5U/1yz6Yf3MgfUH2IOPavHYnyR+uvhpdjz
JMTH/EJ2mEiGRzzk9/YBeciQzAfPF3zlqFD9XprlLZb/R4Cq5htGxRerYEcG
TFvR0qtFi5TTzYMth5nGK3vMXv+7kXjzXzaHnXiH68CwulmtPJzzJ4l68Beo
w1CGlfLO/X7benRUR03l6poMvaO+b1ZmFq/Eg9Xutw4IS1psGFz1yeDg4k8K
SZLXsb7wsnjCp90Z+S8oNZRblPLzypt2CJKPes1d0kXriWNBd01VpmyC8qG1
Cyt4dDsbC3rtPHpZ1RIJmVS1VPGSwpyinmRNBjAaUqiqB0t6euDll0vz/K59
VZ1ia6WGrEO6dGZ1Lv9zM3fFquqZG58ZcGiWL2Ltnepjl69/4DnHvMRHkd3q
dHZL+Z0qAiKgrYmgUm+itvHRneGe1zPxGhwj70b1MgcL+10r6cC5e1tPdSfd
GohCnIcrbomiNkPt3JnSXYKlwg3DHbNumW6XSgWerc7TikIvbxi6QsZet8LY
TCtTZ6euaPpGV3o93f3+gECJLb1D8uVsJhEohHZSR5roga8gVx5Gd7jpWDat
3JDExye3FvCWuDCXtG/A/r+5a8ANIPWafMWvWcjkaT1ulhaEBC6Sbhh7y06U
F2B/jS7sTpTIJCL0aLhm6YIk9p/CDU+J8XRd0V/SpSPtV7CanrnfDwmEoU9F
qTyhvNS1CQIXSnx7UOLTUy50m+uGOVlzvYT5yLn6MRKcXec3HDVLWFPVrtRq
7orKy+/qcH7KZjcQ6GoET0pcdca0JE1tDkLLYBPlZlIIkRsTBH44jJZVrvV7
1TL6cH+XmxMIcE2d3k9eCWV093tDgSgt8EJDoWkXLXx90+BjAM7WdeQPHi75
dessKi01hsTvQolp2sOVdRcv88ltGaU5zQ02L8UHny939dz91pJlmKPg0Rmq
RwtA9OWod0jKla9a7ZXMmeh8s4Q35asRqZ68+72J7DJLNVhtHp1Zc1xmHTdt
kCSEIpSS0m6We6NFGpaXyRZS5c0GS93/UIqTLsjSpSLFM6L7FQhKtS5EApEd
JFMVmpsH5UTmWDsKa2QQFi16/ZIakNWliBxebIbI6Sk6t4H9ro7m9OAQWB9f
qUjyluHuHHelIStKGfjM129rAKXLZMmJWHIl5MuBn8rTcF5I8grPhIlUDf21
cxCCQtgF4tj9qgZk/g3rUY6NWY6OqiqaoNGBLSoTSXOMexXJhIcIl5LceMha
QKisFebJ2JDzzmb5iplzNb13VuWoTQD46k5XFZqaTXNTi+kbGZtQlkYDotDm
AmZCsJQcEUdagkN4SAJHwiOWMZS4HJNQvaE10sCPrHLAJkaJsuqy0S6Tr283
ZZ+pqZaomRYCmpBGVJLYVN0PfVvKzGEYJAouy1FEcPGtJKs0p8Z+NheeMCPM
Pmq2Nja7nqujDVSDpeXQI6H1bBZFNFYhakdZMGQtF0vsP+TTsZpTQuSIcF98
cemZE6KKRfDYiOlsbfRjfeRGH0nk5NKqt2vI40OJx5xnSDxE17jrQIm7aOCB
TNaAKknUK0bFUu/A7mB/6P2xVvOnNTazmWxmrMQtv5XrOGsVZ3UoV1IL4LcF
llE345SlNAtE+dVKmUA3o8NXjw989yAQOXVClFnNdHR5jhruKEQXJ1Upxq4r
T89KScLxkexXdKyqiDB41o4GZTX1zekoUN+cZDbpS+ufNk5oQ5NNb2sxuhml
TXsDpmbVYj8iD1fZR0mFsk9CMpB9nbxFGVsr3+gy8uELQ0YrR+PXiB1IZ9Jn
NM/nTI+fEKOR5o8GR1cuRkokZQg2NpTHqvyT9E3xk3UTRLooX2UwZ40q1lg3
wVko8pC+YHNZVH0mY2hXO7bGJvTIWprRPk2KY5EIz4i1HoTW2F0jbzklVEph
l6Y/5OSjuOt8FFflaJP7vV8gj1RwYvJo8ZCQx8jSWhcCmmO/sLQxmq/iqo0y
nTYKtWjVk/MKclwnGyo9qaaSpT0YWuEUq6quI20KqUS8L0ZEFxN1PO6KsS4m
OjyWCW+oAdTBskxarswVwELxiBPx2AkQMVLtFioY1t1V3+EKfYfWgExHf2u6
tQbPpxLx9Dtdv1lgIVzO+q6nHeFcDUICf4mXZ9UASs+d1XBUlYa4PPjleBJV
BFGD83FxrR+De0ANoI4M2D00P+qEk76N2D1dEMOh8aHK1gICCEc9aEuv0HDf
GpDpwS49vuBYXlKsKSyfVL4xK79oojTcswZQx1Vh+cAiKFCkP7HWWIEotLkg
SorXoqEo0+/WAOqEgNtDDa86OcHtodlVhAYeXhhPAQAKQRMKAfl2rQFUY7AM
lfQa3J500uB4sAb2gjggjXzaf2X16LdrAHVaBreHyt0ykgKlkake/cSZ12Fy
gTMP+VxqKVCjAfm+WQOonwZ0CXW7zrWIMXq85KAN9RoH6mmIpBqt0NB33ogt
/HoNyM4MiDMBbo/FcsHdOVgi61bUsoXQleOXX60B1TkZ7I7UBAGNQhV1JGiS
iIDfxsXS+pC0hb4X9bJYz71d7cs1gNKTL2HVFIBIj4xj98opJdIJ2vimXV/J
4w7q0EDEwxNpact629SAzA/AmOyIODLQZZobG01777D6OcligIqCKP4KbSsz
xfhImDcMcjnkxsOR2tpcJP0A/ztBWHtbcNGbzXBp2PT2Dad6PwlT8PTgqzqc
haY88K2tpf4Klgdc55ANWT2sU73YivcDmRho+cdr+7eaEIw+79nd1u7mp8yW
J4dmQRPvKYKibY9E/D+QlJ1LMvt5ciooSni7vVwtqPRiqryrjncF04wn20hh
xEYKw6ajpYMycugcJeUHHhNzocBysN11HQWjbuaId2dDmdkTBKzbhoj1bf7q
hOi6vVKfKdYXTLGQNw2tvaGDFHYeqAyRvbIypGTWpkCFn48SHkpG/8AJATbF
jHQ3ukI5YdNQT4/D3DFJ4TizqnBo7j0c6k5gJKZy/wlCwjFT6NfU2moKzNke
1XPe6axfrBgHxYm2VZyXbh/3nigkFF4plXcOmuHeNtPSNZxTL8Px+Px0Y2Af
oZCkGUW4S4zi7jUg8anmqS5Vkgv6kbo7ekgznpTCw4h6xMO+1zUkUJgpAiDN
Hrzw/Gv1E0KLvwqnveiHoHNRaktz0dT5uWW5U1KY9/BDxxkARU+kKM/2jeQo
yiDbtHMNiG5OMmh6lKpPcxdySjoI44aq40CCpBt3rPG0P6cwoUZwngkfDZmQ
tCBHOOglR/dqYywosLp5+xpPuyPBaBdI1gWTEyhTfVoyUKfSAG/S5Wmt1nY1
nnaXLPNSdW2oTyMSQeboYQWTGG+MuASwVc5qut/avJ/qJjSO45LoNsILfWCK
R0VgilNqndMql8273/MDLknLZYga06dp6kcPjUWz57yn9PkaT9MO+2qqyqLv
0yJMhIuaZEYewSiMZD8iQ7uiO9QLhYK56qqrrFZ/OzoTEjze/SxYsMDdGXvp
pZfGwVE2Iu6CN1LZaIpzj8CHlsYsVdTo6gHCY445xj12vfXWM8cdd5y5++67
3d+PP/64Of/887lvL6dXL/JaDDsP1eIzr7G2kC3rwE/+2jKODW7FlRYKjwf7
2kc+8pH44/6awmhJdWRlcf/40qVSyUyePDm29KxZs+JL9wdcdYechdER7wFX
ia35pCz9pS99KYJ6qizd3t4eX3pBTRZy/LFHfOnw1uYpsvT73vc+11sSLa1d
8jGtIuwwp5Ksqo8vrSQOl95qq63iUD8TkBa86pSOBGl3ji/91ltvmZkzZ8aW
PvHEE+NLa9t6KhkbfaXFkvFbfumNZekddtghgnqyLM0lkLGltfk8Ug7Wx1Ey
auOeJeP28aXPPffcaGkd0cku2E209KIEGSFbChnz8aW5Zje59E477RSH+tUq
ZGQHQsZt40u/8847Zu21144tfcEFF8SXXhqQUZOGehZByWiNpSjdT8nSe+65
ZwS1Cv8TTzwRX/qNgIyaDDlckyFCRhunfiFceoq56KKLdGn3/w022MAvNxaR
rhyRDjcscfD5c/HlnnrqqdhyhxxySKBC7QcIPFHSx7py7eXU6lUF+laJyeaj
H/1o9P1rrrmm8nVt00GNErPw12fj3509e7b73qRJk6x6W1z57hfCz63iND2f
23rrrQP4tol/6OWXX3YfOvnkk8d/SE3UFlts4SQ4okP4OP3QKaecgmGp/iEa
XGIUDT9UeWH2e/jCDAGF7uOurl4zOhYEUuV+00Ah3jqjwyb4qY9/tyxDitqj
Wz7o4tFGU+6kkcN9U01Pi3TPNjSb1uYG5/O2dg+uLiuZ0X5TrKvnFmK5O2oV
Nzy1IZc37f2jAfjrxEFgdmeRxr3WPukVWCPqdWvsHOCiWvli2YyOjMpJlmE/
rcT1whnT3egnthIgrarrjkjw1D0sJa9V3NVArNvSG9665Ju3MHDloS5TqMsF
UlFn6m08mq9TWZ7sThP0NNW5dMSINlduIpX34Kv1RdOgd9EX/BhSD2aDoaFg
RO7XbR+Qbkf76Pro+3nT2tEW+7vDjT0e8e2vhXbXIxkHt+AH1pb77PeK7hlj
7v26SMMV2281jXVx1VRo7jJ9/i7V6DX3vEd6eH50MXte9qI35Q60F9znQHkF
lWsJKqcIxfqiPVQu7J5qWaXT5yXaB6JJcBb2SUL9aJt2+e7hshnqqlwx3NbR
ZYbKENfPIioUi35EauzCplXNQHA/PRyjLbHaLjoiF2c39egV7h+w4PbatTzq
+NF+8eYeKd2PVe6E1lbbcIv5aItrBLOS6kzHkL8FV7uwcznfmEG7b52GsiPd
jn3yzT0p6Fw9elby+UO93Q5ejoDnCh0icg61Ob0YxLfG5v0F4RYb2jXdoZpB
0gx0h5eGOh0chbZ+RWXYTRy221e6jX3XcqU7w6Ky1Gvq8zpKaNg0KZcK50YH
EnLBDdHx7claa1YGqfnr3SN06Q1GnqRDUW9CtE6+MkDR/cgNdX4ERPxxwhXt
Nq7oHvVYGhmutDLIUh6i9SPmUcYYaPOMwiED/1PyV6jbr/HTls/FbmSvjlHV
vvXueEYlNWYxWtds/GmOFi/SM03ncHwnqchs7Y8yf1G3tVtdX44A8lxSsSJ6
bKQpEooYJqePe1a+2GLamgv6APUCPMbcHfVRs7PS0LK8X0Vh803R7gZBJ1p1
eXcPd319Q+UsT8CW7lwARIgjsa2QixSU/85GgkRaisdMR6HCkoO9esitvyom
c4Vm09XdZc1tt+kQeyg7dc/s6xkwkW0KthJfp9GliCeETWxtk8dmbwWbSE+9
y8bpvV18dcRLmaWVk+voAnv3uOlJrGFd29pNo3SRF3wmNjpR0tKXFOZWGz51
Ryau0SkTLHeDGbCmv6Ea1vINdq2WlhYLZnOxPoE1TnTUWTM4avV8o7c2U6WP
KNhFliyvkcbtXujq/RXV5aFBM1Ihgqd7fXsw0X2a6e9oMnV1ReMPCpZNt6Ot
G5WSG4+5vCk2+I6huvpmo9cRjPZ6pdDYNRzDXKHQYjpb9LtFMyCwsF7RUqAa
5uxeIouSEF3Hbx2N1jfJ11vRqHd+SqHewtbu9+9nnvsDERW8qUWZGT0rMNDu
pSHL30NYCbum1YXaoubvosy7fjuP/MkxESzrjAqfFXWnEwKVJ08Sd2JKxX56
1KEIckr8DIOgWilhD3SquDdDXmmO3684JKWeiIMrJsZurrc12lzUYCj3CjZ1
j0Qb7m2qixT3qM69mMKsT0fGBtX/pZ7Al6rT1j9ZeobpVNWT6Uj0Rno/HLpo
HYlpAl15sF3cx1KKJzsz1ZPNW4rmA3cxMgB+Qq07Y1HoiA6qxDxSP4E+N1Wg
sm+aFstsc3s68TB1s5xnEXGInL3yYEfMMS7OdU6o+qSZ/udASZ8VxRLFugIO
4fhYQoMQzp7qgL/Kh3YTrLzv/wFpQVHf\
\>"]]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"newGraph", "=", 
   GraphicsBox[{{{}, {}, 
      {Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJwVkHk41HkcxydHJYXR8ThKx6RNiGewu9qGjxqUDCVNkXuYyTSOmSFz/SoN
455fh9AhM4Sytdndkrtv5aHDLtqnUhpPsko1I0wUyqz94/28/ny9nvfamKSg
OD0CgUCb2//8OP7N34c54ZGeqhvQHeMAr1LoQlX+46nvNXTZRsgBgbGGaakc
9Mxc/JhF4XFA3FpFMFBqPXMqijSiWA58L5bSphT6cKbHcWpiBwdaDca1WsVS
uOwYZqYmcsDmFzvfMQUJHgzVe/RWHIaAZ22jnxQuYELnXajtYAOckhp7p1Bh
iDw2u//DISBq6bWnGAGQSxDHKx1Y4NEk2IOZBYMoIY54NS0OFPzW668OhMDN
ZwcZ1aUM6N+pejLjEwFNzuHNvoPRELdLpInpioYlWew7/fpR4NX4xaArMRb2
T9XqWKFhYFw/QLAeYIJ9e7mcrj4A9mO+iVuz4+Fs3jUu2XUfbGmwQhQ9DhSR
O2OCmvbAjZ2Rtu1JiRDpHFqqqvaHlkVms8ScZEDqXavGqN5gVV/VV3ufCyW9
T3iWd7fCOukMt9GCD9YpfZPGCnuIIBudzmKlgIxKs+ExPt4h2tEut5Wlgtp0
8mGIuSNKogQmccaPQMr9iuHsSAqinstyyNgsAG/JdAj7ojdqMz9aPj9TCFW2
/GK3VTSUluxY7v9UBB+v3PwkpQQh5fKlhXqmEohXnTO0u74PpfXWeZAYGNAt
WR2vmSGo7c3Jvj8VR6GSbyMOHghD1B6S3sLeY1Dru+ilrW0Uqk9sTB4sPA7e
IcLOmtlolGNx9IWInA7GItXtgnoGcu5RXPJVpYPsktuUsDgOjc6UbZzMOAF1
JMfv1QksxPFr/DVsrXTuB8tpl/XxqKXaJe/rIymQd0/7P9Sx0aONDxj+8Rkg
+dJV0tzEQWPW7vNOGGTCMR21eiwxEWlWGc2or2XCecPnhiWkZFS5/bPG1E8G
pktlrm91yYgs8KAc+iyD8HVOJg0jXCTursgUnMmCHQ1B/zb+xUOq80On2U7Z
kEdovxB+hY+Wp8i+nerNhqs7XWYzzqYgI+62SO6RHIiysg7v46WiJ5JwG9na
XNCqvzHrYo6gW9PB5ZKHufA6aXMQOSAN7b3IWm3PzIM40Ut3lZ0Adfi/+Gpi
lg8dsuOdiy2EaHIN83HNb/lw10p58PCkEHmyumI2+hXAikhiJ7tbhCKai+l9
4wXgXSl+N9IsRj+7ibf7nJSDCT9KpzwnQc/E2zYZnpGD4+iGNHGpBKXeMyK2
nZUDLUEzEqyUoD8CS/q9LsghlyXqX3BVghzYt4SUKjkYhBW2JNRL0JqyTzdc
m+UwQ30gdn8uQUZGsStJw3IYXuH8tXsZhq4E2uu/+SCH+YWTSTUWGPIpGn+v
0MjBltjyTroSQxmk9Ns2WjnEGvs9/3E9hmYpl4KsZuXwWseou+iCoXFebzZx
GQ5Ph4tTDgVh6GRDWVL3Chy0cRFqLzqGnAgsOm6Jg/ng+ljrUAxxCiZIS1bj
EKj6fe/f0Rh6W21+Z+EmHB71PCa7cud8Iy8qOxxweB9wumZJKoZIbsp8mRMO
CzoPrHsnwFDUPadQAzccfNqHiOePz/Us/AL3f8KBsf1aDj8DQ6WBrT+c2IKD
FPHm0bIxtLUo08SLgoOS4i7ckI+hl6/8J3SeOKBG3agOx9B/t7lYjQ==
        "]], 
       LineBox[CompressedData["
1:eJwVl2k41N0fh4coS9mX+UmMNZUQbTwxH2XfSUIRytZmEtmZyS4xRZQWo4VW
j0qlEqfSos1SpCzPRHu2ZCuV//xfnOucz3Xf33PO9825rqMRFOERLEyj0XoE
4//zt5HfTjYhYxaCpV/k15cWkWfiTKzKXjJpMo2+CqZXmLGSAyFUWR+TVlIe
ob34HjOhrpwmUvaDSasTk41WbGX+KU51/smbAbaGvMOsj++YdSIjP37w5AHd
Yw1ZGd+Zav8ssP3O0wKIbd3bBhrOW/y+PWmuDXZqZ3OIhRCWr24yonVqA2Vt
JxbdEIKLfbSKtKIusGfLAv9yYSSvvzugn60HhJeb+CeIoHu3T2HYrsWgpbzS
TZ+eBZf2huEhngn4ytrOG3ZKIeU/Px+pcRMglS8X1S6Fqs/jd/UdlwIq/JJi
c2nITukVhI8thVHv4mfJIjJ4pb5/WZ/9csissv8774kMfMPXxbePrARXVkFl
noUc9kUO9o7ammJYWnHG9q1yqE3IdJQ/bgoo7rprXiSHeXk3Vd1szcAfiJ4f
3i8H/pV59Y1H/wGDVru/86A8Qn9/mHHHygJctVunpB8r4LBoyvbOIxbgVcdM
xfcr4LEUve3noAUY/Q2TITKKWKjhUL78CBPDDwqCiZciJjTXa3fsAZrrZp6L
7lYEt+KUd2gZUKWT9rT3jyL09Idzx58CvANzyprmKcF7WfaYgoYlmn/d+TF/
oxJu2d5+6P7UEow2zaXNrUrweDZrij9mCfa+qs8rhpTwzc3TkMVYDXaYQqya
pDJUfQeK86JXg/efzf1QS2UkbVcPf6q+BsSpOuRzhTKUvm877uuwBgxRHwcr
oozK6JqWL1FrYDTrtaNahzJ6kt3NxJ6sAbdNy8NpJh04kCppHWWFYTHlBXkb
6XjUo2QhfMwK5KdOaloEHS7651n1963A3VOmIL6XDr9HzW2m8tZgHFY6VXuG
jvcKW8QmzKwh8yAz9dt1OrYHTZhVB1mD/PUMOvuIjvg/83gGV6zB16r98PQT
HUKOl1u/vbEG72Y+y3iCjqzDVqLnhGzAUjJ5qDuTQrHJtq1a7jbgvTI4WaNJ
oTq8Zil9WJDVI3tTvCj8c8MxtE3ZFnyH5xlrgyjcE/nvyEGmLWTajpdW76DQ
Uio6PTvfFm7CGhLqqRS8Bw4veXJd4GvGOOjtp8A309+S2WML9GZ31RVRGGzz
aBQysIPbBfnXBWcpRGt9nKpbZ4fmKtElrVUUfrPiDBKT7BCQeb7+eA2FtLrZ
gaZn7MAaOZU4Xk9BcjavYPyZHapMhgK7HlI46GPy8OqoHYY1P4S7PqegUvFw
kqVqDyNrs3zXlxTKRn0WGVjZg/bu77OuDgp6qwf8vm2zB0O+VG2im8K/+Wzu
2QJ7yPB7U070UljeLX8/+LY9eNaD/a0fKdQtrBjT7BP4DpZBhV8pWMea6fEl
HOAmUdPVO0Dh2YPnvseNHdD8IMenbpiCp3zgfl9fBwx/dW7X/UGhM2C0Xnmv
A7jqI26qYxSCKjNHXp1zAM2h4dGJcQpfplR0DrYIePEO08oJCiz7yvWuPwX1
nB+nHSYpTBZZ5szWcARe3hCPEuSU969qG+0c4XY2NnShIM80DhvKYDmCv8ut
boegPi9lSsPqsCMYo9ekLAT7Kz7P8xQiAm6V6HN0lMIxFc3Muk8C/ri1NH2E
glbYtZsJ0k4IWGTd93uIwvlrdv0rVziBu+m2jpCgP+MZXWrj/k5gHIgLP/iF
wk23CPerGU4wUmdcrvpAASeE01iVTmjmXpje8I7C42+Hri9ud4JbdpR3YRcF
V9MFX77+cQL7lmG9z2sK7Rm1c8/qOIPRPrDiYgsF/1euLsHOzkDS3Ef7nlL4
oNHH1ox2RrMBZ9dkA4XRWvGPxxqcYZT3Tj/uOoUEieN0335ncDtX2O+vpCDs
beSorOAi6C+p2KCcguwPr6oDm13A0Ex4Ty+koOan4ZmZ4wIikvKqIIeC/qNv
E4mXBX62dyaPTcHuKJsZNi3g/F9rI7ZR8BJ17PPTdQW//FnSkgAKmyMUM9c6
u4J3Oz0n3ZNC8przLyyOuoIr6s3q+4dC7qWoyKX3BP5LpY0DBhSOKDOVFn5x
BaNzllu2BoW3Y18qc+a6gSj5x8WIUhhvTB6PDndDs4KwsMFjOv783fx4ONEN
RpImfo036BBZal+yjesGhvBVlYlyOmRPyFsE3nAD+9KDIfE0OvQjz6Y7ibqD
GzwrXsqUjs0qrQpaZe7g2xi0l+YpY6vrjY/Hq92BMzN/h8Yog5V2rIb+2B2k
hBl9f5MykgdDNkoNucOIPXR2qaEySu5Nnfq5ygNVZWJ04UYlNG/VMWnu8AAO
Ks33/ayI16USoo79HuC1nI4JeKKInldD7Q+mPUDbUeM7dUER/Ra34m/rrsVw
ZILx0A5FzJJ3vVcetRYBa2sqWwTvucXtWPckGU+Q0BWTRe3yYLR+eXFCxxMB
nOvclkp5CH3xdSJmAv5ikpufIY8GJXPbGcGecGuL8ShaKg+HSCHz7JueaG4q
vtyaIwevBTl6h4LWgbtg5LkuQxYrMXXmesw68D9uu392WAbU+u1aHbnrEFBS
waoiMuhKc1Gbe2MdjN6GHnTfJIMgvpxCmaQX2Kbvn9QtlkZE8dHpi9VeYPwx
bD3aIwm3ytlJLxq9wK/Ym5PEkoTxg6RfQz1eoD3R/R0hJInxkU1jxuLrwa/W
2Z3FkECii/a3Gr/14P2KKj+wVgxZopfaG2Z6I6Bz53mv/SLg7a671OXtA5qF
8uiZ05PMn4MeCw9tF2QH+ZpK3gTTY+uncme2D9iqImOLjo4zRQJleHUVPkD1
peyMfaPMMJegg7xxHxAVMZkmn2Gm0YKZMVsKfUHbyLFRvdbDrO9xRn/TBtCM
57zIKvpQT/ftrT3dtwHsU890z/39VM9q22PqNyHgVitjr4Z/rdd8Vmr8Qm0j
2EfTtdh2Q/UZN79rV+3YCKgu0QorHK13KTwkHiXpB9I14Jty8299j31365SN
PzCv5No9MQkiV/Hnl+9Gf7BjXkcYP5YgNiJqWrd2+SMg/OXUzixJcqnOf3fs
MX/wVOYUOEnOIYkmfPmx7/7gm2pOW8+RIdS8Ps/BY5vgJnW3xstQniyMjdrG
igtA1UVzLeE7FAl2jB8IagrE5yqpJy6TWoRh2XGc/yYQK6vtCj8Za5Ou5ctd
/N8HgjYkOvf8Dm3ioTlS6fMzEKzB5k8X+rQJfoaz3LSCkBVz0aq0RYeoVvj8
MI8JAmtzu+eia/PJS2HTn3T1zVhZfL17dskiYnlrQqRp5xaE6Zc93PB1CZGs
eUeb+y4E7GdGKq5OZmTRd9udq7LCsSUkrOOP5mpidlOFmAtvR7PnDdl0TVvy
r/0mnYcRO/F+SxjbzsmJ3JGQ+SubzYLSHotRZzl3olJT3ll1fxd+C428575f
SzRTp3bdou+G6kxLDyvx9cTfWPxgZmgUtNff9eEt8SWyC5xPN5RGozcrTddq
iR+JMHeN2D6yB92n/mpbMQOI1ZFM/TSDWFzQV7/c8iKQNMgln5yZHgfhxk91
SWmbSQxr8Umntngops165bI8mJQpyhcKSyciQDV3gfGLEBLTcd1Ca3MSIg65
fIrcF0YaermdV3nJ2E29qy5fvJVYtWgJi3Wk4PQb6eHLjdtIzc5brL5CNope
SxreydlBsunJb+KNObBjeBxNNIwgRi28E7bdHFzK7LYvSGSR4alSvfG0vUiT
Xyr9y28X2e5w68JGjVScK5cebDKKJHcqTPZNPklFyLKekxJKu8kTvcebncLT
UFR4bmFG/27yfa6p0F6RdORN5Pouq48iA/PEp/ovpmPukmXVlqejyZk1owPS
Dhm40mBeuy5+DzGOtTAPG81AYUHXnkdBMSSh+VR6bEEmeJOrl+uuiiXdJR8O
bjXMgqf9oetZsnFEMSrj94GOLERuJd02P+OI+K7Vm3btycbe3AluU0s8aU30
U8vQyEHH89wz12oTyLVfnicTG3Nw4Wmfff6pRLL2WKj6opB9+HXk2jd6QhJ5
5PRmUkomF4d17RRpwclknBHy9HxlLpLbBp/kMFMIM7QpSM9hP0be/zsxIcEm
/rXFXp0j+xHcU1Tvk8ImK5clrLHh5uGB8MoGkX42aU9YvVC0IA+O3pc1vw6w
SfQ9cdmGQ3mI9Qzb2zTEJldcD/dYHhVk/n7rkh9sor/1Wpx5eR4GL1x6azjF
JozSoX+X1uZBX/An2SDBIeLiW1S1PufhouSq0St6HHLWddGM3q95KPp6N+7w
Qg6xKRr5whvIwz/n42nJ+hySpsW5ofYjDxoJqbL2Rhzy1/yEh8rfPPxa9sXy
vxUcMhLZkSWrkA9PsdpOSVsO4d4sjWhWysc2Yhf13Y5DDGmhXvlUPsq1Z0i9
duCQ7fvHtOao5yPl7LTVSRcO+VghVy+2MB+Dp6XurvQSnDf45swj/XzkNEwH
qXlziNaystwMw3wsF1KdKeLLIQH3DH1FluUjLPeVa5Of4D5iE7i/QuCvZI1X
b+KQ46518/ea5WO8dtmJkkAOWVWULmVpno+7j7Vt2Zs55G2X09g0Mx8akubf
g4M55H8d9U/S
        "]], LineBox[CompressedData["
1:eJwV1nc4V+0fB3BZoSEjicr4Vo+k7DLCm2T72rNsKZ2Db/be40uipImMjPIr
GspMJRmlyINUUtFTWSUhHut3nj/Oda7Xdd3Xde7zuT+f93VLuPtZHmVlYWH5
SD3/vcemFk30vGY0p16vzKzEkPAvCVPULfxb612NiuODKBKhaya8NhcOaynJ
htz2iyAR0VjKwl74W0up6LrKWDCJpYsJpvMFbPi6l/aRw5dEI/vU798FAijF
kfrnR0hsU9+l/6uAhubWgb25B0iUay7Wz2lsR1aMW8Q9NRL7dDrlWN5vx1ze
3JeXKiTohkEivBt3wpVBCq5VJhFt92RCJlUKXIkxqyv2kPgQ4JB9/OQeXGHd
bZkqRq3va578WaAILoX4lhIOEjEfnRzWzyriuKp4OSs7idvfZ5/IGCthi9J9
dw9WEnwLUue8Z5SQsX+XvdwKgR6x08rDhvswBzJsbo6Ao7dNeN+UChruKj/Q
mSBwyv/H0LS+KvquFSV9GCPQEJFiLJCniroGT83IUQJbM2q3mOurYQPzKuPZ
NwKf7m591J6jjhp1zCUPETi2+A/bQ11N7BNQOd3aT+ASRwz5/rImssVkwwrf
EGhbL9w7/0MTXyrmXWL6CEhLGJXuu6wFBeklCf0eAn8k7bb3BwPFwfezOLsI
nCm7Zn+sEAhPtGWwdBKQkplMn30BSCm4mC+/JGCvnDojKKGNxQJFUc4OAnX6
9S0WL7Th6sw+faiNgGXH6oVPM9poGBFccmklMGZuLcsQ18HQUzpvdAuBLY4T
FzOCdKAr6WLZ0kwgihTzfiF2EII5m46nPCEg9IvIczQ6CFffys4njwlUBNW8
Hgk8iCMh9noslAejLdS4nh8EJ9sZj9RGAjibsOZQoC6KTG/6ddQTaB0U0mTN
1cUX6RZ5Bcp0mXLGo6e6aLm2PT6njoBTa1evqsAhGBQndYbWEghf2lqw9+4h
rH2xeZdzNYFVxne6x94ewvaEW96fHhBgXtLluLFKD+wPR9W9KF9UJE7QLPRQ
zPx4IfI+gSrvGiXhST2QT5Lleu4RUK82Pta7SR/9B+hcAZSb2D9eztLSh/k6
/8CNlF/nc6yszdRHcN4Uz9G7VD0nLsk/f6APFe13yvyUP6nJeKYM6oOdRWm2
6Q6BH72W7av2GsDksJKKLOUg2teFRhsDfBczqxu9TWCREbY3MsoAi6bN3Tco
JzaudVMtMcCJNy1xJOU1awvOzXYYQKo7uVWBcpaDYsu9aQMEh8gXL1YSEClr
mWNsMYQM7dem55SldCacxghDmJQaPfOjXJkZe+b6OUNUDEiv6FPe90Hg6dF6
Qxj03eyiUW6ULpuRHDbEeNa4KhvlQ6FqUp94jHBXnk39awWBjmcvHfMUjHB1
krOng7K1gNtpR0cjHJBZw1FN+b3r9KNN8UZwdRF/VUzZvSJlqueGEXokrWUv
UB5ZENmR9doIcnvuSJ2izDCssDObN0KxpVZdAuW5C9ppayWMMZTI9iWGcsyX
noZ2A2Ow/r1S8p85FY7/TGYYI9JbkeW/9RkxCxK6l4whl3VlKpXyxpcZ1qse
GyOwam9UNuVcEcmUxm/GELf5ml9EmXb8fm0Erwm6hO47VlEuv28wrrLfBLO1
p261U1ZgG9g262wCua32l4Yo15r7WdxLNgFTg0N0hTKusiYyKkzQvC9CWYyq
T9vY+Qd7+kzQdjD/mw5lM9VdI6NLJuB8ZCV/gnJfcoPo9R2mmJQM5T9P2bnH
jH7U1BSxPCNpTyn/IzEcKxlkigb52CszlEm/4Hsfc01hHSyovZs63+kG7q+5
zaag94dFe1KO4MkTdhw3xc3wOMtCyqz2csabBOmQKp5v+EyZ77ft7bMedHQ5
e1n7UP21zUnCOiWNDk/JC8sPKMu0jv2JvEPHF5VKEXaqPw1yYrWOr9ARO3aj
7DplWw7jYaedZpjTWiPMQvW3h9/GFCtTMyw62Mw7Uo4+WP5KM8cMy+nJ60Sr
CKTfCvRXajKDUli/Vizly5u0hKRHzFD89/fP3ym/mxmpSBM1h8i3pYBmar5m
26Nng7zN0WUR2lJMzefSskfbZKQ5mm/SfXbUEGBXMrxCnDFHTSZ/3A3KfFcF
NN2qzVHxqH2inppvGf/rSSYcFsg+sL+Lu4GAYtlpu1ZhC+o8XnaXUFYb8N+l
I2MBmagBzUMPqf/T03i534pavyrKIoPKFw+RbkFaoQV6RHotDal8OmFW/TWv
ygJparbnWJqofkzMrRFuswDT5oBqPeXoH15H1v+0QEXO8l01Kt+uNC1cmz9g
CQOnQ3R3Kg+7TuxQ7Oq3xHo2kxyrVwTe5PNwGI9boiEgZBRU3g72/Ox7tmKJ
9Nr15+WpPB7XrAuv32mFCq/b81u6CawWMGsqDbSCOU/GuCiV55r1oRZRG6wx
t/NJZ+0gAfHukVdXd1iDne2c3sxHKs9GHE0eq1kj8NnOIqXPBJqFNPTZjlpj
OliP7dEwASP/VRqptdZIe15MZx2hznNXmtR5dxtkXGXw6EwTUMFCyYMQG0SW
OOrVzxDYbEfS+tNt0JCbbK3yh8BAIn2baLUNGLrFQxr/UvP7iV+wcI0tWg55
FAWzkPC7mLNys8oWaQ+n0/LWkTCvWBv1qt0WNfo3zKx4SSg8i/r356AteNJD
X6/lIzE75TKjwG0HQbU2zlOCJCLp28dqnOzgZW65oUqUBJPjVl8zpz2qeH/Z
V0uTKAhovDVg7wCjUV6JUGMS8z8spc+TDmiRtEqNMiVheeJbqWmsA6pOFnMl
m5Fgd9tQ0FjmgIoYPv0CKxLH6e5ZBbMOkDstnzd/mITcLs4Qz2xHOH5OidD0
IfFo0BTjnYcRriIjuzqLhLDjUEPx8GHESpm3k9kkGL3Bqk5/DqOqmTTtvUBC
siNf4dW2I1AKqFhXmUMiufbX9ts+RyDOv6ybVELdJ7LPcweucYLOhlbt+loS
g4Yfuhf0nIHSK6M6X0jwly3963jEGWSj0oTGNxJ67NtodSed8W/XRtqBURK3
Gp0DQnOdYbDUI64zSdVH8ZPAzC9nPD6qtydwkcTmrcPWP3JdkOaf2+W70QfS
oYEEI8wVrxJYj9029MFR4/AJ9043CL27VTNT5wNx7f68T2/dMCXddj630QcD
+/bRnb+4QbeyfL1ekw8sJacqHObdwHzs2VHQ7gPMezPMae6oUl+nG9Tvgy1l
Dr81QtxR7PKMeWnWB3+zqs4Li3nAyKfxer2SL7Tr/rB3+npCSfO0+4YaX6yp
+cwi+tkLekasoRVP/bD7l77vAaY36H/KN4nGMaBWK/JYg7pHhW97/KZO/CQq
DV12tPj5Yq2eYvW1ZyfxkGfDMl8qA0WSZ7vtYv0hUlP6/vbTk4hra2a7pBQA
yYSFk3XCAUjP+nDGZykAzgrcWSnHAsFKKn3Y2xoIvl2mxc35QRgMTPncmhwE
Pw0zP3IqGNv+0lNpcgiG7uUUmcS9oTA4OsSvIhGCZv7oIs6kMNj83kA8WAhB
CGNPkUlvOCY7cj8a9ISicKNANitvJFzTOdVH88MQ0v9Ak+YRBXq8aYpidDia
h868v1cQjanpvyQX6RHQfU1j5eqPwYB2/Nq7WyJR41vHGM6ORXNAnPLnxUik
Cke/DVeIg67Oa/XJV1GQe11wVf9DHATLJ5t97kVjciFfajYxHs5Dw5XR2TEg
jer+d0QiAVc6EjTiFWPxsEzx1NzzBAwa+MpMl8TiuVSbh4l3Iua/yxzn5ovD
L1HVVfHsSeD1NtdVDY/DxFbuhfGbSYgNuW+VPR6HkoPTE7xGyTjrW7A12C4e
CqGaGsenk2FfquyS8CIeEV3XkkLPpaDTM5GTRyUBH678k3VClgmFP4WO54oS
sDEwefFsPxNvBU+J6wslgvukjsvJ4FRc/NHJ6xGfiO5Ip23JEmngXJCkl/9J
xP1/rYsi29Pw/Gml+PiJJFjlHhPb7XUKxG2zXmZfElpN3s6t35AOiMmOmxsn
Y1bc60V5RTreOPre9KlJhtaxTncpo9PQu0gwQmkpcG64aPt+6jTYgoO5Ki+m
QEU54qDemQwYq599LM/ORF+EjjTHuQwM79tMCHEyEdTEzdd8PgPb3w4KLaxm
4q7ZpUHtnAwY3JHwb17DhMyJ+2EapRng2Ri5306ACfH8n5VKDRkYVNu/FCnJ
BDe35xba9wykc57wbwcT1812sw2NZoB5avlghQ4TehemRgomMqD165nQOV0m
Emlx1dt+U/tZP/7oiAETyxpXLUWWM+Drli4+acbElH8/k08wE66ePSKbXJg4
U5vv1yWUidQmv5UFVyZkWY7ZZm7ORH+Hyj+f3JkgT8/Q1ollojfXsqrci4mv
ZfyPuKQzcUY+11XTl/rej7clrTKZ0PyTQ6cxmKApF6Yny2Zi+W2LBpc/E65N
so7sypmwvZMr1h1E7YfrD57uz0Qamz5/dQgTeWaNf8WrZYJrryhnbhgTBy4k
rdfWyMS3j8ILsRFMvBswmVnRyoRDm9avo1FM/B+301ap
        "]], 
       LineBox[CompressedData["
1:eJwVjnk41AkcxidsmXpypkjubOQqR0mGb7kZaVGPECFXWeO+r/EzrphJRCkZ
SrYS1qbcvo7dUo+7lRIJeVqbmJEjNNb+8T7v5/3r8yp40uy9+UgkksNm/u9/
uetUc59Fo03sDpkZbAkpi9YxLRk0JvkBf+HpmtaoHbM+UiWTxqTMnjlN1/bW
2Jb7JIGSBWMSQ+pARuhA648CwvY7mx+S6pVRo3SitUWAu7DAFockTtWtbh63
Vfa4qgWHrQQgoWCnWsuPp4Y65+fYOgBdFUGLEhKY+OH8OaElHRAR1sk0iZfA
6s9Lbeo2utDnXz3DmZJA0TWVXP/Fzd1axwis3Y2v5bL1Jq2OwCH+RItxZ0l0
9j8TM8TVB9L3WVHaM2n0Xf/E32xqBMinQWtzVkDIIXaYhZlCncxYL2dEBUUX
zlbneJ0Cfa+NLmUTXTRqjPolXsQRnLoiVRqGDJEd2vL4vdM5kB8wQLc4Exyz
Gh1YM3eDcaHzlt3pluhtEzPr2esB76eSZBOsT+GJhmWB3sCLkLnWxP2+2x53
1H0kSX/0gXtqTxjuXxxRjWMRaJjuD01DJc/UxJ3QoH4vUvgCAENTpU12uWCV
lbvyX7RAUPS/vPpKzA2bt4vwRDOCoILec9ig6gLurbs/Ut0RDIXxf14poXii
IrEW3CAZCuR3ny1XOF7opk2+luYbBjKNDkWUUm8UVbW911kcDit2G65++r5I
o9jRArgREMcd7+xf8EPTm2nqKZpRsOExs0U07xJ2iiWUbmVEA5hNaXmcC8DI
II1S6t8x0H3awiFGMhBLJMTz+ITjYIKd13a4kYaRw0+NlLzigW1xQ8q9LQg7
J66O/MFOgErx7Kma/GA07VfiExxOBH4vGZq3XwjWBTYETeYlgYT91vlQaihm
SCa8jdGmAzX78vU2hTA81M++YzFKh3KayKg/ORzn14pVllKSgb1/8LHFbDgG
WDc8clUggLNaYareHoHN5TpXVl4S8FLOrMPnQSS+VHnhRfVPAc0cXimTHoUc
6WNbkgUYELWWd73uTDTOypDXvlQwYOK05uARwxgsM/k2K2ydCvmCI6F08VjU
jjKi+H1LBZ/wmmOKP2Ixtu8uIyo3DXT4tmQkvonD0cJP1y5ppUNfAb2w43E8
SoSlrucMp4Nnou1+t/wEJAefdA+OyID84D1jxbREHIg7L5uqkAkVS/XbijSS
sHbVsTSuKxNSHZSnnUqS0OG2r5yazxVYZR16476Tjs+pb1eERLJAs8woKzeZ
jkvyPq8eVmaBmaLNSaF5Ohr79nqqWGfDmcGZDJpLMro1FZwd4WaDa2XZcV5v
MurrxZqYX2UC58O0Ro8hgUOxJw/+lMuEtrtzPz8xIjC8nSzaeZ0JEf2j8oVA
YI3djbETt5hwm+G/x8eUQPVLtdGU+0yIFdMX5tkQKF88V6XbxITL5CRVTRcC
yeSL+5Q+MyEw7/A2VjSBv9mp8U/MMEFSPGZfeCyB5vncf9izTGheZmu7xBOY
okR/JrvABKs9GR4H6ATyKHfs9/KYEPZ7U1drOoHckOF00V0soBbRO+YLCLxa
X0zr282CyY/500M3CdQi+Z5lSbHghXLa9uZbBAZkLyrtlGOB7utlx4xiAqfL
xVoFD7Lg0Rfxbwrlm76vb8ueq7PgGHVNRvABgUp6JVmpWixw5jVafn1I4IV2
LWcBPRYYMV6wGyo3/wguQ8dRFtybE+9hVxNYZNdyINmABeNvjq6n1hBomM8Q
OkFhwbygrtqvTwh89566uGHMgjFbQReHpwT+BxQqjsk=
        "]], 
       LineBox[CompressedData["
1:eJwVkHk01AkAxyfH5loMW5soWdmI2HW0HYav2LFE1pkOR2SkhnHf55zmh5mh
1lHJjDOdFh0UHRSpiDbPEVaeXpeVEWpZu/aP7/u+73uf977f99ULYniEyJBI
JM8V/e/vpUsuVNqcDdWUpETKpCO6KsnCQfLcVt0ntdCFSUei8hRNSzJh2zlk
qHGWTUdKazVJTjJra0oL6rXn0/FPEcv1i1gW9RMejtcL6GiVk87OijXx8bV7
t0E1HRt3GznOiPUhKqUpG/TQsa+//eO02AKvKroTfjUKR8aY3wHVeQvIjExK
8kzCUfdm/p7JXkt0dVt2PzULB3nR8GTYnCX8dSsM9m8Pxx+6eVYTTtuxJ3yk
OM8+HAfDvJP7pTuQqcMf5PmHI3RpUrbFwQYyH86qVBaGA/ks5Z9jHSAdVrBW
VYsAedanLj94H7Ibr5X6KDFgcyvRPU3dC8nKD/0bVSMhjmm9/NL3AMZdc/SM
f4/EqNNI3yLVHwtMoyZFzyiE7E2eCuo5gnVVj/yKlKNh17wg1xNxFKL6vtWH
O6OhfHOcpD1Og0CqWiSfHgPjGccI6+wwmOY456v9EotdTevvUmToUA/zza9W
iMNVpwCDh4wIDIlj9xd3xqFFSX2ZzI9E862QtoEz8Vh/s3q4ri0Kj+MPLh4O
TsB3rMWo5nUxIOlsOT9GSYS/uWIBLzQWPh2Tq33XJoFs5FrZXhYHH+8Sn5bx
JDAobgy6NB6qlbW3O+8kw6GEZ8I2TYRKUDl1pygF7Rrp5V9xkvBE01tlZ0wq
EiK3lbu8SAazVKlR2zMNkjWap2TUUoE+fnPH5nQkDFy30Q9Og5K6VH5SIQPt
r0TDDeJ0xF58oUOMZsChV19GYSADS1z3bVTfTNyMaI6cOJUJ1RD52sSuTPDX
pQ8mm2eh8LLkuaNVFn7oFZ9zHMmCuHq5zrE2Cx8Xywzn2UxMXMjnHtFmgu7c
fPGwHguW7KHhRQ4TLTUWOZ+7WGg+UsFt/8JEl2FnsEsYG2+NapZJNBZmtHeu
YspxECu620B5xsLUBsXFD5c4yHBamq6xZ6PK/tOUmjMXmp9PJMddZcM80YZy
7BMXBqPkpKjNHKQ8q+AknuThdPGGwc58DkZOTxYcN8tGYNLbpxr/cLAmlruU
P5AN8p8pgTlRXChG7QmIiucjTnSjxmuUi75Uv41cPQIFQX65rl48XPvbqzz1
EQFRXOhxy04ePM+G6hrTcpB76VZCsGU2OlwGP6uq52JXScOF+7XZmN9Ee3zh
Si62mXsthnzLh21oT5Chcx5W6ZmRp5l8+N8u8hmW5qF17UPp+QU+dlil2FNF
ApyoyftRcpRAf8qerfInBTB6wBvl0QjE3Vckt/8mQJdLaG7EMQL1bsWjdmdW
cuOLd7vpBEyOX0uiVAsQUBtW3x9DYFPZ9FXL2wI0MazpKiwCiopHdfTfCCAo
keUnSgicdzOWffVOgO+jKR4BFQSohdK34qkVvs5bh1pFgK2fdWPjrAC67E0N
mrUElinnPNYvC0Diar2/UkdAGj2QTf5GCNiFsSfvrPzSVMZ4tlaIB2OMQ0/u
ETAjhfoItYQoTnO3aGgjQM+b0/9aV4jRscrJzA4Cr2s07ihsFUIxkOul07PS
99dgVYeJEBytAHPZXgL6VpJcrpkQBQZk8rs+AoH3zQ7KWQnhEUjqvdG/skdh
AW0/CVG5mVJ/boBAqVvrFuYuIbppHqc4QwSsCzmqdhQhumZsE+gvCQy9dJn7
11aIapH8Ic9RAv8Bt6VjjA==
        "]], LineBox[CompressedData["
1:eJwVjVdUkwcARtMYEaTKcjAqgmlVRsESKQ4CH0Kh7CMirZriQBOwYa+wAiRk
wf8ngDiqVEIUsFgF5ThAwIq0tlQR4iiU4VFqHRjARBBFSe3DPffhPlz7PYkR
+6gUCiX0A/97VPsuxJ896ZVfTLGlFHCRUpPF8Ku+4/2+3XrHQzEXPGMN26p6
xDtHt/ZIB8lFTnsthVat885kxZmLjnHx/rAw9I1yDuJd1AbzL3HRTtPqdEoL
sNQnxi3GuLDd6BDwUknHOuuAa6tY8Qi73zkxrmRA+xO5N3xdAlAmNP4qzQ8k
W0K5Oz8JZrqoxrKYMFzJ3xTc8CwJXld4m/NMI+EbGJrp1JkMZWr7mcFvt6F2
UUSY87kUDAcOqWf8o6Hi9Nqz5KnYF5yt2XN7N7Jag5Sm/DT4tLym3U7Yi/pr
FhR2XDqMLz+k2DxkIz3sG9Zzvww4vQxI8JTGwWaoIkbnlokNzda/MKlcbNeF
cJzMeGgI3PnZb4kJmGyODKGN8tA233TWTJaEWEHU4O6/smB9uXag8XoyMtTq
2LGmbKwQziS3WKZi56eBSr0qB9FuRuUSThpUK02az5G5MHMIPdlZlY78xvDu
8tg8JDLDE7naDHh4Fsunt/Lh94PEuciFB1m4dzDJyEenOV9lIMrCdrfMbXfM
CpCZ9Lkq5F42lh2cymuUFKB6sUUF1SQXZzY22dVMfuh9F73oMXlwHHlhOcgt
ROej0oEmJR/p3TEKx8FC+PXSqYZ9+XhRJsgIDBTgckJL0khFASKibJvqrwog
s+T3Z7sVQhj9Op7uIsSaXuXxgKFCVHNC+cM1QkzMVK2eKhJA83WwPs6mCNyg
ltMseyHmJYhnP5YVoa2OUTLdJcSCCq8tWn0Rulb/HhMSV4QH7xkrxxNEeGmz
/iMBTYQH3r1xrQMiaJYZzbz4WYRbglHqzc1i1Pi+0pgEiSE18rXWXRXDjefF
jH0lhmvZUgnLQ4KcnhMi3gEJTrIcUoZqJRg6+rh8v6sU/pSRWy6LpFicJn5X
1ifF3ZNW+R3FUhglb9qZnCHDGpI8G/9GCnXud7Zi+2JkZ/AZO5JluPA2UpX7
RzEmPJY6WD2RYUslZ7kTuwQMpqZyLLIYN0L6pxeaEojxBdvgZjGm7Nh/1p8l
sJvsOeO+sQTenNt7VgeRKGkwZLufKkF06+GoAS0JlbotNdOWwDr3HF//Ujkk
6xv1PQSB+zmbHOcekGMJ78CVNjmB9A4js86DctRdzMisLyVwPvzIsM8xOX5l
MMeFFQSc91/IYtbKQXXpGv6ykoBd1XjD2lY5+Cv+aas8TcDIaO8n9KdypBlb
5sZ2ETgV7jTn0XM55gTNeGy9ScD/kPaZUiNHuXRY59NNoIheeMlWJ8f5uTXf
26gJzDKPR1jPyjGh/2JHdz8BbUqf1GyRAvtfBW9Y+4xAaXNVYs8SBd66uU7Z
jRJwpXCiFFYKyJLNzy/QEOCSk/QFyxWoG+tzeDJB4N8686uGjgo8frrP6uj0
h99Yf80NZwXSVgXeE78lQHevJsSuCtDYzmWp7wjs6nDdTnNXgD6iNQylkJg1
fI3rHgqcs7/fuZ5K4sfw9lWCDQr47GouWEkj4XlItNCHqUDv8UpPCwMSfw+G
TOq9Fdg1lD+tn0fiPw0COcM=
        "]]}}, {InsetBox[
       StyleBox[Cell["3/2",
         GeneratedCell->False,
         CellAutoOverwrite->False,
         CellBaseline->Baseline,
         TextAlignment->Left],
        FontSize->14,
        Background->GrayLevel[
         1.]], {53.423991724917585`, 300.55672121624684`}, {Left, Baseline},
       Alignment->{Left, Top}], InsetBox[
       StyleBox[Cell["1/2",
         GeneratedCell->False,
         CellAutoOverwrite->False,
         CellBaseline->Baseline,
         TextAlignment->Left],
        FontSize->14,
        Background->GrayLevel[1.]], {53.423991724917585`, 47.8193914180369}, {
       Left, Baseline},
       Alignment->{Left, Top}], InsetBox[
       StyleBox[Cell["3/2",
         GeneratedCell->False,
         CellAutoOverwrite->False,
         CellBaseline->Baseline,
         TextAlignment->Left],
        FontSize->14,
        Background->GrayLevel[1.]], {541.8707710954949, 666.7679541891612}, {
       Left, Baseline},
       Alignment->{Left, Top}], InsetBox[
       StyleBox[Cell["1/2",
         GeneratedCell->False,
         CellAutoOverwrite->False,
         CellBaseline->Baseline,
         TextAlignment->Left],
        FontSize->14,
        Background->GrayLevel[1.]], {541.8707710954949, 563.6098603939736}, {
       Left, Baseline},
       Alignment->{Left, Top}], InsetBox[
       StyleBox[Cell["-1/2",
         GeneratedCell->False,
         CellAutoOverwrite->False,
         CellBaseline->Baseline,
         TextAlignment->Left],
        FontSize->14,
        Background->GrayLevel[
         1.]], {531.6522192258175, 475.92548066806467`}, {Left, Baseline},
       Alignment->{Left, Top}], InsetBox[
       StyleBox[Cell["-3/2",
         GeneratedCell->False,
         CellAutoOverwrite->False,
         CellBaseline->Baseline,
         TextAlignment->Left],
        FontSize->14,
        Background->GrayLevel[
         1.]], {531.6522192258175, -173.97051024161578`}, {Left, Baseline},
       Alignment->{Left, Top}], InsetBox[
       StyleBox[Cell["1/2",
         GeneratedCell->False,
         CellAutoOverwrite->False,
         CellBaseline->Baseline,
         TextAlignment->Left],
        FontSize->14,
        Background->GrayLevel[
         1.]], {541.8707710954951, -385.44460252174986`}, {Left, Baseline},
       Alignment->{Left, Top}], InsetBox[
       StyleBox[Cell["-1/2",
         GeneratedCell->False,
         CellAutoOverwrite->False,
         CellBaseline->Baseline,
         TextAlignment->Left],
        FontSize->14,
        Background->GrayLevel[1.]], {531.6522192258175, -287.4444134163218}, {
       Left, Baseline},
       Alignment->{Left, Top}], InsetBox[
       StyleBox[Cell["F",
         GeneratedCell->False,
         CellAutoOverwrite->False,
         CellBaseline->Baseline,
         TextAlignment->Left],
        FontSize->14,
        Background->GrayLevel[
         1.]], {63.03788516961572, 458.74032736543734`}, {Left, Baseline},
       Alignment->{Left, Top}], 
      GeometricTransformationBox[GraphicsGroupBox[InsetBox[
         StyleBox[Cell[TextData[Cell[BoxData[
           FormBox[
            SubscriptBox["F", "z"], TraditionalForm]],
           FormatType->"TraditionalForm"]],
           GeneratedCell->False,
           CellAutoOverwrite->False,
           CellBaseline->Baseline,
           TextAlignment->Left],
          FontSize->14,
          
          Background->GrayLevel[
           1.]], {401.11016633293957`, 781.1156948085691}, {Left, Baseline},
         Alignment->{Left, Top}]], {{{{0.9999999999999999, 0.}, {0., 
         0.999999999999999}}, {150.46860934793455`, 20.118170895030723`}}}]}},
    
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->True,
    AxesLabel->{
      FormBox["\"B(G)\"", TraditionalForm], 
      FormBox["\"E/h (MHz)\"", TraditionalForm]},
    AxesOrigin->{0, 0},
    AxesStyle->Arrowheads[Automatic],
    ImagePadding->{{22.836735, 39.}, {1.1, 20.}},
    ImageSize->{620., Automatic},
    LabelStyle->Directive[Bold, Larger],
    PlotRange->{{-20.833333, 1020.833333}, {-663.28634, 961.495625}},
    PlotRangeClipping->True,
    PlotRangePadding->Automatic,
    Ticks->{{{0, 
        FormBox["0", TraditionalForm]}, {200, 
        FormBox["200", TraditionalForm]}, {400, 
        FormBox["400", TraditionalForm]}, {600, 
        FormBox["600", TraditionalForm]}, {800, 
        FormBox["800", TraditionalForm]}, {1000, 
        FormBox["1000", TraditionalForm]}}, {{-600, 
        FormBox[
         RowBox[{"-", "600"}], TraditionalForm]}, {-400, 
        FormBox[
         RowBox[{"-", "400"}], TraditionalForm]}, {-200, 
        FormBox[
         RowBox[{"-", "200"}], TraditionalForm]}, {0, 
        FormBox["0", TraditionalForm]}, {200, 
        FormBox["200", TraditionalForm]}, {400, 
        FormBox["400", TraditionalForm]}, {600, 
        FormBox["600", TraditionalForm]}, {800, 
        FormBox["800", TraditionalForm]}}}]}], "\[IndentingNewLine]"}]], \
"Input",
 CellChangeTimes->{{3.521479139716526*^9, 3.5214792981786957`*^9}, {
  3.521479634719635*^9, 3.52147966690282*^9}, {3.5214802681478853`*^9, 
  3.521480282344163*^9}}],

Cell[BoxData[
 GraphicsBox[{{{}, {}, 
    {Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJwVkHk41HkcxydHJYXR8ThKx6RNiGewu9qGjxqUDCVNkXuYyTSOmSFz/SoN
455fh9AhM4Sytdndkrtv5aHDLtqnUhpPsko1I0wUyqz94/28/ny9nvfamKSg
OD0CgUCb2//8OP7N34c54ZGeqhvQHeMAr1LoQlX+46nvNXTZRsgBgbGGaakc
9Mxc/JhF4XFA3FpFMFBqPXMqijSiWA58L5bSphT6cKbHcWpiBwdaDca1WsVS
uOwYZqYmcsDmFzvfMQUJHgzVe/RWHIaAZ22jnxQuYELnXajtYAOckhp7p1Bh
iDw2u//DISBq6bWnGAGQSxDHKx1Y4NEk2IOZBYMoIY54NS0OFPzW668OhMDN
ZwcZ1aUM6N+pejLjEwFNzuHNvoPRELdLpInpioYlWew7/fpR4NX4xaArMRb2
T9XqWKFhYFw/QLAeYIJ9e7mcrj4A9mO+iVuz4+Fs3jUu2XUfbGmwQhQ9DhSR
O2OCmvbAjZ2Rtu1JiRDpHFqqqvaHlkVms8ScZEDqXavGqN5gVV/VV3ufCyW9
T3iWd7fCOukMt9GCD9YpfZPGCnuIIBudzmKlgIxKs+ExPt4h2tEut5Wlgtp0
8mGIuSNKogQmccaPQMr9iuHsSAqinstyyNgsAG/JdAj7ojdqMz9aPj9TCFW2
/GK3VTSUluxY7v9UBB+v3PwkpQQh5fKlhXqmEohXnTO0u74PpfXWeZAYGNAt
WR2vmSGo7c3Jvj8VR6GSbyMOHghD1B6S3sLeY1Dru+ilrW0Uqk9sTB4sPA7e
IcLOmtlolGNx9IWInA7GItXtgnoGcu5RXPJVpYPsktuUsDgOjc6UbZzMOAF1
JMfv1QksxPFr/DVsrXTuB8tpl/XxqKXaJe/rIymQd0/7P9Sx0aONDxj+8Rkg
+dJV0tzEQWPW7vNOGGTCMR21eiwxEWlWGc2or2XCecPnhiWkZFS5/bPG1E8G
pktlrm91yYgs8KAc+iyD8HVOJg0jXCTursgUnMmCHQ1B/zb+xUOq80On2U7Z
kEdovxB+hY+Wp8i+nerNhqs7XWYzzqYgI+62SO6RHIiysg7v46WiJ5JwG9na
XNCqvzHrYo6gW9PB5ZKHufA6aXMQOSAN7b3IWm3PzIM40Ut3lZ0Adfi/+Gpi
lg8dsuOdiy2EaHIN83HNb/lw10p58PCkEHmyumI2+hXAikhiJ7tbhCKai+l9
4wXgXSl+N9IsRj+7ibf7nJSDCT9KpzwnQc/E2zYZnpGD4+iGNHGpBKXeMyK2
nZUDLUEzEqyUoD8CS/q9LsghlyXqX3BVghzYt4SUKjkYhBW2JNRL0JqyTzdc
m+UwQ30gdn8uQUZGsStJw3IYXuH8tXsZhq4E2uu/+SCH+YWTSTUWGPIpGn+v
0MjBltjyTroSQxmk9Ns2WjnEGvs9/3E9hmYpl4KsZuXwWseou+iCoXFebzZx
GQ5Ph4tTDgVh6GRDWVL3Chy0cRFqLzqGnAgsOm6Jg/ng+ljrUAxxCiZIS1bj
EKj6fe/f0Rh6W21+Z+EmHB71PCa7cud8Iy8qOxxweB9wumZJKoZIbsp8mRMO
CzoPrHsnwFDUPadQAzccfNqHiOePz/Us/AL3f8KBsf1aDj8DQ6WBrT+c2IKD
FPHm0bIxtLUo08SLgoOS4i7ckI+hl6/8J3SeOKBG3agOx9B/t7lYjQ==
      "]], 
     LineBox[CompressedData["
1:eJwVl2k41N0fh4coS9mX+UmMNZUQbTwxH2XfSUIRytZmEtmZyS4xRZQWo4VW
j0qlEqfSos1SpCzPRHu2ZCuV//xfnOucz3Xf33PO9825rqMRFOERLEyj0XoE
4//zt5HfTjYhYxaCpV/k15cWkWfiTKzKXjJpMo2+CqZXmLGSAyFUWR+TVlIe
ob34HjOhrpwmUvaDSasTk41WbGX+KU51/smbAbaGvMOsj++YdSIjP37w5AHd
Yw1ZGd+Zav8ssP3O0wKIbd3bBhrOW/y+PWmuDXZqZ3OIhRCWr24yonVqA2Vt
JxbdEIKLfbSKtKIusGfLAv9yYSSvvzugn60HhJeb+CeIoHu3T2HYrsWgpbzS
TZ+eBZf2huEhngn4ytrOG3ZKIeU/Px+pcRMglS8X1S6Fqs/jd/UdlwIq/JJi
c2nITukVhI8thVHv4mfJIjJ4pb5/WZ/9csissv8774kMfMPXxbePrARXVkFl
noUc9kUO9o7ammJYWnHG9q1yqE3IdJQ/bgoo7rprXiSHeXk3Vd1szcAfiJ4f
3i8H/pV59Y1H/wGDVru/86A8Qn9/mHHHygJctVunpB8r4LBoyvbOIxbgVcdM
xfcr4LEUve3noAUY/Q2TITKKWKjhUL78CBPDDwqCiZciJjTXa3fsAZrrZp6L
7lYEt+KUd2gZUKWT9rT3jyL09Idzx58CvANzyprmKcF7WfaYgoYlmn/d+TF/
oxJu2d5+6P7UEow2zaXNrUrweDZrij9mCfa+qs8rhpTwzc3TkMVYDXaYQqya
pDJUfQeK86JXg/efzf1QS2UkbVcPf6q+BsSpOuRzhTKUvm877uuwBgxRHwcr
oozK6JqWL1FrYDTrtaNahzJ6kt3NxJ6sAbdNy8NpJh04kCppHWWFYTHlBXkb
6XjUo2QhfMwK5KdOaloEHS7651n1963A3VOmIL6XDr9HzW2m8tZgHFY6VXuG
jvcKW8QmzKwh8yAz9dt1OrYHTZhVB1mD/PUMOvuIjvg/83gGV6zB16r98PQT
HUKOl1u/vbEG72Y+y3iCjqzDVqLnhGzAUjJ5qDuTQrHJtq1a7jbgvTI4WaNJ
oTq8Zil9WJDVI3tTvCj8c8MxtE3ZFnyH5xlrgyjcE/nvyEGmLWTajpdW76DQ
Uio6PTvfFm7CGhLqqRS8Bw4veXJd4GvGOOjtp8A309+S2WML9GZ31RVRGGzz
aBQysIPbBfnXBWcpRGt9nKpbZ4fmKtElrVUUfrPiDBKT7BCQeb7+eA2FtLrZ
gaZn7MAaOZU4Xk9BcjavYPyZHapMhgK7HlI46GPy8OqoHYY1P4S7PqegUvFw
kqVqDyNrs3zXlxTKRn0WGVjZg/bu77OuDgp6qwf8vm2zB0O+VG2im8K/+Wzu
2QJ7yPB7U070UljeLX8/+LY9eNaD/a0fKdQtrBjT7BP4DpZBhV8pWMea6fEl
HOAmUdPVO0Dh2YPnvseNHdD8IMenbpiCp3zgfl9fBwx/dW7X/UGhM2C0Xnmv
A7jqI26qYxSCKjNHXp1zAM2h4dGJcQpfplR0DrYIePEO08oJCiz7yvWuPwX1
nB+nHSYpTBZZ5szWcARe3hCPEuSU969qG+0c4XY2NnShIM80DhvKYDmCv8ut
boegPi9lSsPqsCMYo9ekLAT7Kz7P8xQiAm6V6HN0lMIxFc3Muk8C/ri1NH2E
glbYtZsJ0k4IWGTd93uIwvlrdv0rVziBu+m2jpCgP+MZXWrj/k5gHIgLP/iF
wk23CPerGU4wUmdcrvpAASeE01iVTmjmXpje8I7C42+Hri9ud4JbdpR3YRcF
V9MFX77+cQL7lmG9z2sK7Rm1c8/qOIPRPrDiYgsF/1euLsHOzkDS3Ef7nlL4
oNHH1ox2RrMBZ9dkA4XRWvGPxxqcYZT3Tj/uOoUEieN0335ncDtX2O+vpCDs
beSorOAi6C+p2KCcguwPr6oDm13A0Ex4Ty+koOan4ZmZ4wIikvKqIIeC/qNv
E4mXBX62dyaPTcHuKJsZNi3g/F9rI7ZR8BJ17PPTdQW//FnSkgAKmyMUM9c6
u4J3Oz0n3ZNC8przLyyOuoIr6s3q+4dC7qWoyKX3BP5LpY0DBhSOKDOVFn5x
BaNzllu2BoW3Y18qc+a6gSj5x8WIUhhvTB6PDndDs4KwsMFjOv783fx4ONEN
RpImfo036BBZal+yjesGhvBVlYlyOmRPyFsE3nAD+9KDIfE0OvQjz6Y7ibqD
GzwrXsqUjs0qrQpaZe7g2xi0l+YpY6vrjY/Hq92BMzN/h8Yog5V2rIb+2B2k
hBl9f5MykgdDNkoNucOIPXR2qaEySu5Nnfq5ygNVZWJ04UYlNG/VMWnu8AAO
Ks33/ayI16USoo79HuC1nI4JeKKInldD7Q+mPUDbUeM7dUER/Ra34m/rrsVw
ZILx0A5FzJJ3vVcetRYBa2sqWwTvucXtWPckGU+Q0BWTRe3yYLR+eXFCxxMB
nOvclkp5CH3xdSJmAv5ikpufIY8GJXPbGcGecGuL8ShaKg+HSCHz7JueaG4q
vtyaIwevBTl6h4LWgbtg5LkuQxYrMXXmesw68D9uu392WAbU+u1aHbnrEFBS
waoiMuhKc1Gbe2MdjN6GHnTfJIMgvpxCmaQX2Kbvn9QtlkZE8dHpi9VeYPwx
bD3aIwm3ytlJLxq9wK/Ym5PEkoTxg6RfQz1eoD3R/R0hJInxkU1jxuLrwa/W
2Z3FkECii/a3Gr/14P2KKj+wVgxZopfaG2Z6I6Bz53mv/SLg7a671OXtA5qF
8uiZ05PMn4MeCw9tF2QH+ZpK3gTTY+uncme2D9iqImOLjo4zRQJleHUVPkD1
peyMfaPMMJegg7xxHxAVMZkmn2Gm0YKZMVsKfUHbyLFRvdbDrO9xRn/TBtCM
57zIKvpQT/ftrT3dtwHsU890z/39VM9q22PqNyHgVitjr4Z/rdd8Vmr8Qm0j
2EfTtdh2Q/UZN79rV+3YCKgu0QorHK13KTwkHiXpB9I14Jty8299j31365SN
PzCv5No9MQkiV/Hnl+9Gf7BjXkcYP5YgNiJqWrd2+SMg/OXUzixJcqnOf3fs
MX/wVOYUOEnOIYkmfPmx7/7gm2pOW8+RIdS8Ps/BY5vgJnW3xstQniyMjdrG
igtA1UVzLeE7FAl2jB8IagrE5yqpJy6TWoRh2XGc/yYQK6vtCj8Za5Ou5ctd
/N8HgjYkOvf8Dm3ioTlS6fMzEKzB5k8X+rQJfoaz3LSCkBVz0aq0RYeoVvj8
MI8JAmtzu+eia/PJS2HTn3T1zVhZfL17dskiYnlrQqRp5xaE6Zc93PB1CZGs
eUeb+y4E7GdGKq5OZmTRd9udq7LCsSUkrOOP5mpidlOFmAtvR7PnDdl0TVvy
r/0mnYcRO/F+SxjbzsmJ3JGQ+SubzYLSHotRZzl3olJT3ll1fxd+C428575f
SzRTp3bdou+G6kxLDyvx9cTfWPxgZmgUtNff9eEt8SWyC5xPN5RGozcrTddq
iR+JMHeN2D6yB92n/mpbMQOI1ZFM/TSDWFzQV7/c8iKQNMgln5yZHgfhxk91
SWmbSQxr8Umntngops165bI8mJQpyhcKSyciQDV3gfGLEBLTcd1Ca3MSIg65
fIrcF0YaermdV3nJ2E29qy5fvJVYtWgJi3Wk4PQb6eHLjdtIzc5brL5CNope
SxreydlBsunJb+KNObBjeBxNNIwgRi28E7bdHFzK7LYvSGSR4alSvfG0vUiT
Xyr9y28X2e5w68JGjVScK5cebDKKJHcqTPZNPklFyLKekxJKu8kTvcebncLT
UFR4bmFG/27yfa6p0F6RdORN5Pouq48iA/PEp/ovpmPukmXVlqejyZk1owPS
Dhm40mBeuy5+DzGOtTAPG81AYUHXnkdBMSSh+VR6bEEmeJOrl+uuiiXdJR8O
bjXMgqf9oetZsnFEMSrj94GOLERuJd02P+OI+K7Vm3btycbe3AluU0s8aU30
U8vQyEHH89wz12oTyLVfnicTG3Nw4Wmfff6pRLL2WKj6opB9+HXk2jd6QhJ5
5PRmUkomF4d17RRpwclknBHy9HxlLpLbBp/kMFMIM7QpSM9hP0be/zsxIcEm
/rXFXp0j+xHcU1Tvk8ImK5clrLHh5uGB8MoGkX42aU9YvVC0IA+O3pc1vw6w
SfQ9cdmGQ3mI9Qzb2zTEJldcD/dYHhVk/n7rkh9sor/1Wpx5eR4GL1x6azjF
JozSoX+X1uZBX/An2SDBIeLiW1S1PufhouSq0St6HHLWddGM3q95KPp6N+7w
Qg6xKRr5whvIwz/n42nJ+hySpsW5ofYjDxoJqbL2Rhzy1/yEh8rfPPxa9sXy
vxUcMhLZkSWrkA9PsdpOSVsO4d4sjWhWysc2Yhf13Y5DDGmhXvlUPsq1Z0i9
duCQ7fvHtOao5yPl7LTVSRcO+VghVy+2MB+Dp6XurvQSnDf45swj/XzkNEwH
qXlziNaystwMw3wsF1KdKeLLIQH3DH1FluUjLPeVa5Of4D5iE7i/QuCvZI1X
b+KQ46518/ea5WO8dtmJkkAOWVWULmVpno+7j7Vt2Zs55G2X09g0Mx8akubf
g4M55H8d9U/S
      "]], LineBox[CompressedData["
1:eJwV1nc4V+0fB3BZoSEjicr4Vo+k7DLCm2T72rNsKZ2Db/be40uipImMjPIr
GspMJRmlyINUUtFTWSUhHut3nj/Oda7Xdd3Xde7zuT+f93VLuPtZHmVlYWH5
SD3/vcemFk30vGY0p16vzKzEkPAvCVPULfxb612NiuODKBKhaya8NhcOaynJ
htz2iyAR0VjKwl74W0up6LrKWDCJpYsJpvMFbPi6l/aRw5dEI/vU798FAijF
kfrnR0hsU9+l/6uAhubWgb25B0iUay7Wz2lsR1aMW8Q9NRL7dDrlWN5vx1ze
3JeXKiTohkEivBt3wpVBCq5VJhFt92RCJlUKXIkxqyv2kPgQ4JB9/OQeXGHd
bZkqRq3va578WaAILoX4lhIOEjEfnRzWzyriuKp4OSs7idvfZ5/IGCthi9J9
dw9WEnwLUue8Z5SQsX+XvdwKgR6x08rDhvswBzJsbo6Ao7dNeN+UChruKj/Q
mSBwyv/H0LS+KvquFSV9GCPQEJFiLJCniroGT83IUQJbM2q3mOurYQPzKuPZ
NwKf7m591J6jjhp1zCUPETi2+A/bQ11N7BNQOd3aT+ASRwz5/rImssVkwwrf
EGhbL9w7/0MTXyrmXWL6CEhLGJXuu6wFBeklCf0eAn8k7bb3BwPFwfezOLsI
nCm7Zn+sEAhPtGWwdBKQkplMn30BSCm4mC+/JGCvnDojKKGNxQJFUc4OAnX6
9S0WL7Th6sw+faiNgGXH6oVPM9poGBFccmklMGZuLcsQ18HQUzpvdAuBLY4T
FzOCdKAr6WLZ0kwgihTzfiF2EII5m46nPCEg9IvIczQ6CFffys4njwlUBNW8
Hgk8iCMh9noslAejLdS4nh8EJ9sZj9RGAjibsOZQoC6KTG/6ddQTaB0U0mTN
1cUX6RZ5Bcp0mXLGo6e6aLm2PT6njoBTa1evqsAhGBQndYbWEghf2lqw9+4h
rH2xeZdzNYFVxne6x94ewvaEW96fHhBgXtLluLFKD+wPR9W9KF9UJE7QLPRQ
zPx4IfI+gSrvGiXhST2QT5Lleu4RUK82Pta7SR/9B+hcAZSb2D9eztLSh/k6
/8CNlF/nc6yszdRHcN4Uz9G7VD0nLsk/f6APFe13yvyUP6nJeKYM6oOdRWm2
6Q6BH72W7av2GsDksJKKLOUg2teFRhsDfBczqxu9TWCREbY3MsoAi6bN3Tco
JzaudVMtMcCJNy1xJOU1awvOzXYYQKo7uVWBcpaDYsu9aQMEh8gXL1YSEClr
mWNsMYQM7dem55SldCacxghDmJQaPfOjXJkZe+b6OUNUDEiv6FPe90Hg6dF6
Qxj03eyiUW6ULpuRHDbEeNa4KhvlQ6FqUp94jHBXnk39awWBjmcvHfMUjHB1
krOng7K1gNtpR0cjHJBZw1FN+b3r9KNN8UZwdRF/VUzZvSJlqueGEXokrWUv
UB5ZENmR9doIcnvuSJ2izDCssDObN0KxpVZdAuW5C9ppayWMMZTI9iWGcsyX
noZ2A2Ow/r1S8p85FY7/TGYYI9JbkeW/9RkxCxK6l4whl3VlKpXyxpcZ1qse
GyOwam9UNuVcEcmUxm/GELf5ml9EmXb8fm0Erwm6hO47VlEuv28wrrLfBLO1
p261U1ZgG9g262wCua32l4Yo15r7WdxLNgFTg0N0hTKusiYyKkzQvC9CWYyq
T9vY+Qd7+kzQdjD/mw5lM9VdI6NLJuB8ZCV/gnJfcoPo9R2mmJQM5T9P2bnH
jH7U1BSxPCNpTyn/IzEcKxlkigb52CszlEm/4Hsfc01hHSyovZs63+kG7q+5
zaag94dFe1KO4MkTdhw3xc3wOMtCyqz2csabBOmQKp5v+EyZ77ft7bMedHQ5
e1n7UP21zUnCOiWNDk/JC8sPKMu0jv2JvEPHF5VKEXaqPw1yYrWOr9ARO3aj
7DplWw7jYaedZpjTWiPMQvW3h9/GFCtTMyw62Mw7Uo4+WP5KM8cMy+nJ60Sr
CKTfCvRXajKDUli/Vizly5u0hKRHzFD89/fP3ym/mxmpSBM1h8i3pYBmar5m
26Nng7zN0WUR2lJMzefSskfbZKQ5mm/SfXbUEGBXMrxCnDFHTSZ/3A3KfFcF
NN2qzVHxqH2inppvGf/rSSYcFsg+sL+Lu4GAYtlpu1ZhC+o8XnaXUFYb8N+l
I2MBmagBzUMPqf/T03i534pavyrKIoPKFw+RbkFaoQV6RHotDal8OmFW/TWv
ygJparbnWJqofkzMrRFuswDT5oBqPeXoH15H1v+0QEXO8l01Kt+uNC1cmz9g
CQOnQ3R3Kg+7TuxQ7Oq3xHo2kxyrVwTe5PNwGI9boiEgZBRU3g72/Ox7tmKJ
9Nr15+WpPB7XrAuv32mFCq/b81u6CawWMGsqDbSCOU/GuCiV55r1oRZRG6wx
t/NJZ+0gAfHukVdXd1iDne2c3sxHKs9GHE0eq1kj8NnOIqXPBJqFNPTZjlpj
OliP7dEwASP/VRqptdZIe15MZx2hznNXmtR5dxtkXGXw6EwTUMFCyYMQG0SW
OOrVzxDYbEfS+tNt0JCbbK3yh8BAIn2baLUNGLrFQxr/UvP7iV+wcI0tWg55
FAWzkPC7mLNys8oWaQ+n0/LWkTCvWBv1qt0WNfo3zKx4SSg8i/r356AteNJD
X6/lIzE75TKjwG0HQbU2zlOCJCLp28dqnOzgZW65oUqUBJPjVl8zpz2qeH/Z
V0uTKAhovDVg7wCjUV6JUGMS8z8spc+TDmiRtEqNMiVheeJbqWmsA6pOFnMl
m5Fgd9tQ0FjmgIoYPv0CKxLH6e5ZBbMOkDstnzd/mITcLs4Qz2xHOH5OidD0
IfFo0BTjnYcRriIjuzqLhLDjUEPx8GHESpm3k9kkGL3Bqk5/DqOqmTTtvUBC
siNf4dW2I1AKqFhXmUMiufbX9ts+RyDOv6ybVELdJ7LPcweucYLOhlbt+loS
g4Yfuhf0nIHSK6M6X0jwly3963jEGWSj0oTGNxJ67NtodSed8W/XRtqBURK3
Gp0DQnOdYbDUI64zSdVH8ZPAzC9nPD6qtydwkcTmrcPWP3JdkOaf2+W70QfS
oYEEI8wVrxJYj9029MFR4/AJ9043CL27VTNT5wNx7f68T2/dMCXddj630QcD
+/bRnb+4QbeyfL1ekw8sJacqHObdwHzs2VHQ7gPMezPMae6oUl+nG9Tvgy1l
Dr81QtxR7PKMeWnWB3+zqs4Li3nAyKfxer2SL7Tr/rB3+npCSfO0+4YaX6yp
+cwi+tkLekasoRVP/bD7l77vAaY36H/KN4nGMaBWK/JYg7pHhW97/KZO/CQq
DV12tPj5Yq2eYvW1ZyfxkGfDMl8qA0WSZ7vtYv0hUlP6/vbTk4hra2a7pBQA
yYSFk3XCAUjP+nDGZykAzgrcWSnHAsFKKn3Y2xoIvl2mxc35QRgMTPncmhwE
Pw0zP3IqGNv+0lNpcgiG7uUUmcS9oTA4OsSvIhGCZv7oIs6kMNj83kA8WAhB
CGNPkUlvOCY7cj8a9ISicKNANitvJFzTOdVH88MQ0v9Ak+YRBXq8aYpidDia
h868v1cQjanpvyQX6RHQfU1j5eqPwYB2/Nq7WyJR41vHGM6ORXNAnPLnxUik
Cke/DVeIg67Oa/XJV1GQe11wVf9DHATLJ5t97kVjciFfajYxHs5Dw5XR2TEg
jer+d0QiAVc6EjTiFWPxsEzx1NzzBAwa+MpMl8TiuVSbh4l3Iua/yxzn5ovD
L1HVVfHsSeD1NtdVDY/DxFbuhfGbSYgNuW+VPR6HkoPTE7xGyTjrW7A12C4e
CqGaGsenk2FfquyS8CIeEV3XkkLPpaDTM5GTRyUBH678k3VClgmFP4WO54oS
sDEwefFsPxNvBU+J6wslgvukjsvJ4FRc/NHJ6xGfiO5Ip23JEmngXJCkl/9J
xP1/rYsi29Pw/Gml+PiJJFjlHhPb7XUKxG2zXmZfElpN3s6t35AOiMmOmxsn
Y1bc60V5RTreOPre9KlJhtaxTncpo9PQu0gwQmkpcG64aPt+6jTYgoO5Ki+m
QEU54qDemQwYq599LM/ORF+EjjTHuQwM79tMCHEyEdTEzdd8PgPb3w4KLaxm
4q7ZpUHtnAwY3JHwb17DhMyJ+2EapRng2Ri5306ACfH8n5VKDRkYVNu/FCnJ
BDe35xba9wykc57wbwcT1812sw2NZoB5avlghQ4TehemRgomMqD165nQOV0m
Emlx1dt+U/tZP/7oiAETyxpXLUWWM+Drli4+acbElH8/k08wE66ePSKbXJg4
U5vv1yWUidQmv5UFVyZkWY7ZZm7ORH+Hyj+f3JkgT8/Q1ollojfXsqrci4mv
ZfyPuKQzcUY+11XTl/rej7clrTKZ0PyTQ6cxmKApF6Yny2Zi+W2LBpc/E65N
so7sypmwvZMr1h1E7YfrD57uz0Qamz5/dQgTeWaNf8WrZYJrryhnbhgTBy4k
rdfWyMS3j8ILsRFMvBswmVnRyoRDm9avo1FM/B+301ap
      "]], 
     LineBox[CompressedData["
1:eJwVjnk41AkcxidsmXpypkjubOQqR0mGb7kZaVGPECFXWeO+r/EzrphJRCkZ
SrYS1qbcvo7dUo+7lRIJeVqbmJEjNNb+8T7v5/3r8yp40uy9+UgkksNm/u9/
uetUc59Fo03sDpkZbAkpi9YxLRk0JvkBf+HpmtaoHbM+UiWTxqTMnjlN1/bW
2Jb7JIGSBWMSQ+pARuhA648CwvY7mx+S6pVRo3SitUWAu7DAFockTtWtbh63
Vfa4qgWHrQQgoWCnWsuPp4Y65+fYOgBdFUGLEhKY+OH8OaElHRAR1sk0iZfA
6s9Lbeo2utDnXz3DmZJA0TWVXP/Fzd1axwis3Y2v5bL1Jq2OwCH+RItxZ0l0
9j8TM8TVB9L3WVHaM2n0Xf/E32xqBMinQWtzVkDIIXaYhZlCncxYL2dEBUUX
zlbneJ0Cfa+NLmUTXTRqjPolXsQRnLoiVRqGDJEd2vL4vdM5kB8wQLc4Exyz
Gh1YM3eDcaHzlt3pluhtEzPr2esB76eSZBOsT+GJhmWB3sCLkLnWxP2+2x53
1H0kSX/0gXtqTxjuXxxRjWMRaJjuD01DJc/UxJ3QoH4vUvgCAENTpU12uWCV
lbvyX7RAUPS/vPpKzA2bt4vwRDOCoILec9ig6gLurbs/Ut0RDIXxf14poXii
IrEW3CAZCuR3ny1XOF7opk2+luYbBjKNDkWUUm8UVbW911kcDit2G65++r5I
o9jRArgREMcd7+xf8EPTm2nqKZpRsOExs0U07xJ2iiWUbmVEA5hNaXmcC8DI
II1S6t8x0H3awiFGMhBLJMTz+ITjYIKd13a4kYaRw0+NlLzigW1xQ8q9LQg7
J66O/MFOgErx7Kma/GA07VfiExxOBH4vGZq3XwjWBTYETeYlgYT91vlQaihm
SCa8jdGmAzX78vU2hTA81M++YzFKh3KayKg/ORzn14pVllKSgb1/8LHFbDgG
WDc8clUggLNaYareHoHN5TpXVl4S8FLOrMPnQSS+VHnhRfVPAc0cXimTHoUc
6WNbkgUYELWWd73uTDTOypDXvlQwYOK05uARwxgsM/k2K2ydCvmCI6F08VjU
jjKi+H1LBZ/wmmOKP2Ixtu8uIyo3DXT4tmQkvonD0cJP1y5ppUNfAb2w43E8
SoSlrucMp4Nnou1+t/wEJAefdA+OyID84D1jxbREHIg7L5uqkAkVS/XbijSS
sHbVsTSuKxNSHZSnnUqS0OG2r5yazxVYZR16476Tjs+pb1eERLJAs8woKzeZ
jkvyPq8eVmaBmaLNSaF5Ohr79nqqWGfDmcGZDJpLMro1FZwd4WaDa2XZcV5v
MurrxZqYX2UC58O0Ro8hgUOxJw/+lMuEtrtzPz8xIjC8nSzaeZ0JEf2j8oVA
YI3djbETt5hwm+G/x8eUQPVLtdGU+0yIFdMX5tkQKF88V6XbxITL5CRVTRcC
yeSL+5Q+MyEw7/A2VjSBv9mp8U/MMEFSPGZfeCyB5vncf9izTGheZmu7xBOY
okR/JrvABKs9GR4H6ATyKHfs9/KYEPZ7U1drOoHckOF00V0soBbRO+YLCLxa
X0zr282CyY/500M3CdQi+Z5lSbHghXLa9uZbBAZkLyrtlGOB7utlx4xiAqfL
xVoFD7Lg0Rfxbwrlm76vb8ueq7PgGHVNRvABgUp6JVmpWixw5jVafn1I4IV2
LWcBPRYYMV6wGyo3/wguQ8dRFtybE+9hVxNYZNdyINmABeNvjq6n1hBomM8Q
OkFhwbygrtqvTwh89566uGHMgjFbQReHpwT+BxQqjsk=
      "]], 
     LineBox[CompressedData["
1:eJwVkHk01AkAxyfH5loMW5soWdmI2HW0HYav2LFE1pkOR2SkhnHf55zmh5mh
1lHJjDOdFh0UHRSpiDbPEVaeXpeVEWpZu/aP7/u+73uf977f99ULYniEyJBI
JM8V/e/vpUsuVNqcDdWUpETKpCO6KsnCQfLcVt0ntdCFSUei8hRNSzJh2zlk
qHGWTUdKazVJTjJra0oL6rXn0/FPEcv1i1gW9RMejtcL6GiVk87OijXx8bV7
t0E1HRt3GznOiPUhKqUpG/TQsa+//eO02AKvKroTfjUKR8aY3wHVeQvIjExK
8kzCUfdm/p7JXkt0dVt2PzULB3nR8GTYnCX8dSsM9m8Pxx+6eVYTTtuxJ3yk
OM8+HAfDvJP7pTuQqcMf5PmHI3RpUrbFwQYyH86qVBaGA/ks5Z9jHSAdVrBW
VYsAedanLj94H7Ibr5X6KDFgcyvRPU3dC8nKD/0bVSMhjmm9/NL3AMZdc/SM
f4/EqNNI3yLVHwtMoyZFzyiE7E2eCuo5gnVVj/yKlKNh17wg1xNxFKL6vtWH
O6OhfHOcpD1Og0CqWiSfHgPjGccI6+wwmOY456v9EotdTevvUmToUA/zza9W
iMNVpwCDh4wIDIlj9xd3xqFFSX2ZzI9E862QtoEz8Vh/s3q4ri0Kj+MPLh4O
TsB3rMWo5nUxIOlsOT9GSYS/uWIBLzQWPh2Tq33XJoFs5FrZXhYHH+8Sn5bx
JDAobgy6NB6qlbW3O+8kw6GEZ8I2TYRKUDl1pygF7Rrp5V9xkvBE01tlZ0wq
EiK3lbu8SAazVKlR2zMNkjWap2TUUoE+fnPH5nQkDFy30Q9Og5K6VH5SIQPt
r0TDDeJ0xF58oUOMZsChV19GYSADS1z3bVTfTNyMaI6cOJUJ1RD52sSuTPDX
pQ8mm2eh8LLkuaNVFn7oFZ9zHMmCuHq5zrE2Cx8Xywzn2UxMXMjnHtFmgu7c
fPGwHguW7KHhRQ4TLTUWOZ+7WGg+UsFt/8JEl2FnsEsYG2+NapZJNBZmtHeu
YspxECu620B5xsLUBsXFD5c4yHBamq6xZ6PK/tOUmjMXmp9PJMddZcM80YZy
7BMXBqPkpKjNHKQ8q+AknuThdPGGwc58DkZOTxYcN8tGYNLbpxr/cLAmlruU
P5AN8p8pgTlRXChG7QmIiucjTnSjxmuUi75Uv41cPQIFQX65rl48XPvbqzz1
EQFRXOhxy04ePM+G6hrTcpB76VZCsGU2OlwGP6uq52JXScOF+7XZmN9Ee3zh
Si62mXsthnzLh21oT5Chcx5W6ZmRp5l8+N8u8hmW5qF17UPp+QU+dlil2FNF
ApyoyftRcpRAf8qerfInBTB6wBvl0QjE3Vckt/8mQJdLaG7EMQL1bsWjdmdW
cuOLd7vpBEyOX0uiVAsQUBtW3x9DYFPZ9FXL2wI0MazpKiwCiopHdfTfCCAo
keUnSgicdzOWffVOgO+jKR4BFQSohdK34qkVvs5bh1pFgK2fdWPjrAC67E0N
mrUElinnPNYvC0Diar2/UkdAGj2QTf5GCNiFsSfvrPzSVMZ4tlaIB2OMQ0/u
ETAjhfoItYQoTnO3aGgjQM+b0/9aV4jRscrJzA4Cr2s07ihsFUIxkOul07PS
99dgVYeJEBytAHPZXgL6VpJcrpkQBQZk8rs+AoH3zQ7KWQnhEUjqvdG/skdh
AW0/CVG5mVJ/boBAqVvrFuYuIbppHqc4QwSsCzmqdhQhumZsE+gvCQy9dJn7
11aIapH8Ic9RAv8Bt6VjjA==
      "]], LineBox[CompressedData["
1:eJwVjVdUkwcARtMYEaTKcjAqgmlVRsESKQ4CH0Kh7CMirZriQBOwYa+wAiRk
wf8ngDiqVEIUsFgF5ThAwIq0tlQR4iiU4VFqHRjARBBFSe3DPffhPlz7PYkR
+6gUCiX0A/97VPsuxJ896ZVfTLGlFHCRUpPF8Ku+4/2+3XrHQzEXPGMN26p6
xDtHt/ZIB8lFTnsthVat885kxZmLjnHx/rAw9I1yDuJd1AbzL3HRTtPqdEoL
sNQnxi3GuLDd6BDwUknHOuuAa6tY8Qi73zkxrmRA+xO5N3xdAlAmNP4qzQ8k
W0K5Oz8JZrqoxrKYMFzJ3xTc8CwJXld4m/NMI+EbGJrp1JkMZWr7mcFvt6F2
UUSY87kUDAcOqWf8o6Hi9Nqz5KnYF5yt2XN7N7Jag5Sm/DT4tLym3U7Yi/pr
FhR2XDqMLz+k2DxkIz3sG9Zzvww4vQxI8JTGwWaoIkbnlokNzda/MKlcbNeF
cJzMeGgI3PnZb4kJmGyODKGN8tA233TWTJaEWEHU4O6/smB9uXag8XoyMtTq
2LGmbKwQziS3WKZi56eBSr0qB9FuRuUSThpUK02az5G5MHMIPdlZlY78xvDu
8tg8JDLDE7naDHh4Fsunt/Lh94PEuciFB1m4dzDJyEenOV9lIMrCdrfMbXfM
CpCZ9Lkq5F42lh2cymuUFKB6sUUF1SQXZzY22dVMfuh9F73oMXlwHHlhOcgt
ROej0oEmJR/p3TEKx8FC+PXSqYZ9+XhRJsgIDBTgckJL0khFASKibJvqrwog
s+T3Z7sVQhj9Op7uIsSaXuXxgKFCVHNC+cM1QkzMVK2eKhJA83WwPs6mCNyg
ltMseyHmJYhnP5YVoa2OUTLdJcSCCq8tWn0Rulb/HhMSV4QH7xkrxxNEeGmz
/iMBTYQH3r1xrQMiaJYZzbz4WYRbglHqzc1i1Pi+0pgEiSE18rXWXRXDjefF
jH0lhmvZUgnLQ4KcnhMi3gEJTrIcUoZqJRg6+rh8v6sU/pSRWy6LpFicJn5X
1ifF3ZNW+R3FUhglb9qZnCHDGpI8G/9GCnXud7Zi+2JkZ/AZO5JluPA2UpX7
RzEmPJY6WD2RYUslZ7kTuwQMpqZyLLIYN0L6pxeaEojxBdvgZjGm7Nh/1p8l
sJvsOeO+sQTenNt7VgeRKGkwZLufKkF06+GoAS0JlbotNdOWwDr3HF//Ujkk
6xv1PQSB+zmbHOcekGMJ78CVNjmB9A4js86DctRdzMisLyVwPvzIsM8xOX5l
MMeFFQSc91/IYtbKQXXpGv6ykoBd1XjD2lY5+Cv+aas8TcDIaO8n9KdypBlb
5sZ2ETgV7jTn0XM55gTNeGy9ScD/kPaZUiNHuXRY59NNoIheeMlWJ8f5uTXf
26gJzDKPR1jPyjGh/2JHdz8BbUqf1GyRAvtfBW9Y+4xAaXNVYs8SBd66uU7Z
jRJwpXCiFFYKyJLNzy/QEOCSk/QFyxWoG+tzeDJB4N8686uGjgo8frrP6uj0
h99Yf80NZwXSVgXeE78lQHevJsSuCtDYzmWp7wjs6nDdTnNXgD6iNQylkJg1
fI3rHgqcs7/fuZ5K4sfw9lWCDQr47GouWEkj4XlItNCHqUDv8UpPCwMSfw+G
TOq9Fdg1lD+tn0fiPw0COcM=
      "]]}}, 
   GeometricTransformationBox[{InsetBox[Cell["",
       GeneratedCell->False,
       CellAutoOverwrite->False,
       CellBaseline->Baseline,
       TextAlignment->Left], {24.604854265820393`, 314.17858643519776`}, {
      Left, Baseline},
      Alignment->{Left, Top}], 
     InsetBox["", {18.473723144014002`, 314.17858643519685`}, {Left, Baseline},
      Alignment->{Left, Top}], 
     InsetBox["", {18.473723144014002`, 319.33649112495596`}, {Left, Baseline},
      Alignment->{Left, Top}], 
     InsetBox["", {18.473723144014002`, 61.44125663698742}, {Left, Baseline},
      Alignment->{Left, Top}], InsetBox[Cell["3/2",
       GeneratedCell->False,
       CellAutoOverwrite->False,
       CellBaseline->Baseline,
       TextAlignment->Left], {-12.181932465018065`, 298.7048723659195}, {
      Left, Baseline},
      Alignment->{Left, Top}], InsetBox[Cell["1/2",
       GeneratedCell->False,
       CellAutoOverwrite->False,
       CellBaseline->Baseline,
       TextAlignment->Left], {-12.181932465018065`, 45.96754256770919}, {
      Left, Baseline},
      Alignment->{Left, Top}], 
     InsetBox["", {666.2495831221961, 783.547913203301}, {Left, Baseline},
      Alignment->{Left, Top}], 
     InsetBox["", {564.0640644254227, 747.4425803749855}, {Left, Baseline},
      Alignment->{Left, Top}], InsetBox[Cell["3/2",
       GeneratedCell->False,
       CellAutoOverwrite->False,
       CellBaseline->Baseline,
       TextAlignment->Left], {541.5832503121326, 664.9161053388339}, {
      Left, Baseline},
      Alignment->{Left, Top}], InsetBox[Cell["1/2",
       GeneratedCell->False,
       CellAutoOverwrite->False,
       CellBaseline->Baseline,
       TextAlignment->Left], {541.5832503121326, 561.7580115436463}, {
      Left, Baseline},
      Alignment->{Left, Top}], 
     InsetBox["", {572.2389059211646, 401.86296616110576`}, {Left, Baseline},
      Alignment->{Left, Top}], InsetBox[Cell["-1/2",
       GeneratedCell->False,
       CellAutoOverwrite->False,
       CellBaseline->Baseline,
       TextAlignment->Left], {531.3646984424552, 474.0736318177369}, {
      Left, Baseline},
      Alignment->{Left, Top}], 
     InsetBox["", {572.2389059211646, -139.71702626362867`}, {Left, Baseline},
      
      Alignment->{Left, Top}], InsetBox[Cell["-3/2",
       GeneratedCell->False,
       CellAutoOverwrite->False,
       CellBaseline->Baseline,
       TextAlignment->Left], {531.3646984424552, -175.82235909194424`}, {
      Left, Baseline},
      Alignment->{Left, Top}], 
     InsetBox["", {572.2389059211648, -346.03321385400386`}, {Left, Baseline},
      
      Alignment->{Left, Top}], InsetBox[Cell["1/2",
       GeneratedCell->False,
       CellAutoOverwrite->False,
       CellBaseline->Baseline,
       TextAlignment->Left], {541.5832503121327, -387.29645137207854`}, {
      Left, Baseline},
      Alignment->{Left, Top}], InsetBox[Cell["-1/2",
       GeneratedCell->False,
       CellAutoOverwrite->False,
       CellBaseline->Baseline,
       TextAlignment->Left], {531.3646984424552, -289.2962622666505}, {
      Left, Baseline},
      Alignment->{Left, Top}], 
     InsetBox["", {709.167500974841, -366.6648326130394}, {Left, Baseline},
      Alignment->{Left, Top}], 
     InsetBox["", {155.03031037171348`, 548.2200887386182}, {Left, Baseline},
      Alignment->{Left, Top}], 
     InsetBox["", {1.0507823908747582`, 529.9537666939168}, {Left, Baseline},
      Alignment->{Left, Top}], InsetBox[Cell["",
       CellBaseline->Baseline,
       TextAlignment->Left], {-7.996271137111535, 525.3871861827413}, {
      Left, Baseline},
      Alignment->{Left, Top}], 
     InsetBox["", {151.41148896051897`, 561.9198302721447}, {Left, Baseline},
      Alignment->{Left, Top}], 
     InsetBox["", {-4.3774497259170175`, 447.75531749275797`}, {
      Left, Baseline},
      Alignment->{Left, Top}], 
     InsetBox["", {111.42483543230725`, 466.02163953746003`}, {Left, Baseline},
      Alignment->{Left, Top}], InsetBox[Cell["F",
       GeneratedCell->False,
       CellAutoOverwrite->False,
       CellBaseline->Baseline,
       TextAlignment->Left], {-9.805681842708793, 466.02163953746003`}, {
      Left, Baseline},
      Alignment->{Left, Top}], 
     InsetBox["", {-9.805681842708793, 479.7213810709866}, {Left, Top}, {
      18.094107055972586`, Automatic},
      Alignment->{Left, Top}], 
     InsetBox["", {399.30075562734277`, 461.45505902628406`}, {Left, Baseline},
      Alignment->{Left, Top}], InsetBox[Cell["F",
       GeneratedCell->False,
       CellAutoOverwrite->False,
       CellBaseline->Baseline,
       TextAlignment->Left], {544.053612075123, 790.2488558309194}, {
      Left, Baseline},
      Alignment->{Left, Top}], InsetBox[Cell["z",
       GeneratedCell->False,
       CellAutoOverwrite->False,
       CellBaseline->Baseline,
       TextAlignment->Left], {556.7194870143035, 767.415953275043}, {
      Left, Baseline},
      Alignment->{Left, Top}]}, {{{{1., 0.}, {0., 0.9999999999999999}}, {
      44.35075628000888, 11.128435865904525`}}}]},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesLabel->{
    FormBox["\"B(G)\"", TraditionalForm], 
    FormBox["\"E/h (MHz)\"", TraditionalForm]},
  AxesOrigin->{0, 0},
  AxesStyle->Arrowheads[Automatic],
  ImagePadding->{{22.836735, 39.}, {1.1, 20.}},
  ImageSize->{620., Automatic},
  LabelStyle->Directive[Bold, Larger],
  PlotRange->{{-20.833333, 1020.833333}, {-663.28634, 961.495625}},
  PlotRangeClipping->True,
  PlotRangePadding->Automatic,
  Ticks->{{{0, 
      FormBox["0", TraditionalForm]}, {200, 
      FormBox["200", TraditionalForm]}, {400, 
      FormBox["400", TraditionalForm]}, {600, 
      FormBox["600", TraditionalForm]}, {800, 
      FormBox["800", TraditionalForm]}, {1000, 
      FormBox["1000", TraditionalForm]}}, {{-600, 
      FormBox[
       RowBox[{"-", "600"}], TraditionalForm]}, {-400, 
      FormBox[
       RowBox[{"-", "400"}], TraditionalForm]}, {-200, 
      FormBox[
       RowBox[{"-", "200"}], TraditionalForm]}, {0, 
      FormBox["0", TraditionalForm]}, {200, 
      FormBox["200", TraditionalForm]}, {400, 
      FormBox["400", TraditionalForm]}, {600, 
      FormBox["600", TraditionalForm]}, {800, 
      FormBox["800", TraditionalForm]}}}]], "Output",
 CellChangeTimes->{3.5214793001131163`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Text", "[", 
  RowBox[{"Zeeman", " ", "Energy", " ", 
   RowBox[{"E", "/", "h"}], " ", 
   RowBox[{"(", "Mhz", ")"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.5214759135396433`*^9, 3.521475919471191*^9}, {
  3.521476002161232*^9, 3.521476014866728*^9}}],

Cell[BoxData[
 InterpretationBox[Cell[BoxData[
   FractionBox[
    RowBox[{"\[ExponentialE]", " ", "Energy", " ", "Mhz", " ", "Zeeman"}], 
    "h"]], "Text", "TR"],
  Text[E $CellContext`Energy $CellContext`h^(-1) $CellContext`Mhz \
$CellContext`Zeeman]]], "Output",
 CellChangeTimes->{3.521479079315011*^9}]
}, Open  ]],

Cell[BoxData[
 RowBox[{
  RowBox[{"label", "=", 
   GraphicsBox[{
     InsetBox["", {-0.07755839488807892, 0.26697598328864025`}, {
      Left, Baseline},
      Alignment->{Left, Top}], GeometricTransformationBox[InsetBox[
       StyleBox[Cell["Zeeman Energy  E/h (Mhz)",
         GeneratedCell->False,
         CellAutoOverwrite->False,
         CellBaseline->Baseline,
         TextAlignment->Left],
        FontSize->14,
        Background->GrayLevel[
         1.]], {-0.2339003308521741, -0.2715351294765771}, {Left, Baseline},
       Alignment->{Left, Top}], {{{{
        6.123233995736766*^-17, -0.9999999999999999}, {0.9999999999999999, 
        6.123233995736766*^-17}}, {
        0.06904708585735775, -0.5692987699394982}}}]},
    ImagePadding->{{0., 1.}, {1., 0.}},
    ImageSize->{292.9294730769231, Automatic},
    PlotRange->{{-1.041667, 1.041667}, {-1.04, 1.04}},
    PlotRangePadding->Automatic]}], ";"}]], "Input",
 CellChangeTimes->{{3.5214759253278637`*^9, 3.521475994161221*^9}, {
  3.521476085587875*^9, 3.521476161878188*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Show", "[", "graph", "]"}]], "Input",
 CellChangeTimes->{{3.521475866634708*^9, 3.5214758700366573`*^9}, {
  3.521476165761958*^9, 3.521476208346397*^9}}],

Cell[BoxData[
 GraphicsBox[{{}, {}, 
   {Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJwVkHk41HkcxydHJYXR8ThKx6RNiGewu9qGjxqUDCVNkXuYyTSOmSFz/SoN
455fh9AhM4Sytdndkrtv5aHDLtqnUhpPsko1I0wUyqz94/28/ny9nvfamKSg
OD0CgUCb2//8OP7N34c54ZGeqhvQHeMAr1LoQlX+46nvNXTZRsgBgbGGaakc
9Mxc/JhF4XFA3FpFMFBqPXMqijSiWA58L5bSphT6cKbHcWpiBwdaDca1WsVS
uOwYZqYmcsDmFzvfMQUJHgzVe/RWHIaAZ22jnxQuYELnXajtYAOckhp7p1Bh
iDw2u//DISBq6bWnGAGQSxDHKx1Y4NEk2IOZBYMoIY54NS0OFPzW668OhMDN
ZwcZ1aUM6N+pejLjEwFNzuHNvoPRELdLpInpioYlWew7/fpR4NX4xaArMRb2
T9XqWKFhYFw/QLAeYIJ9e7mcrj4A9mO+iVuz4+Fs3jUu2XUfbGmwQhQ9DhSR
O2OCmvbAjZ2Rtu1JiRDpHFqqqvaHlkVms8ScZEDqXavGqN5gVV/VV3ufCyW9
T3iWd7fCOukMt9GCD9YpfZPGCnuIIBudzmKlgIxKs+ExPt4h2tEut5Wlgtp0
8mGIuSNKogQmccaPQMr9iuHsSAqinstyyNgsAG/JdAj7ojdqMz9aPj9TCFW2
/GK3VTSUluxY7v9UBB+v3PwkpQQh5fKlhXqmEohXnTO0u74PpfXWeZAYGNAt
WR2vmSGo7c3Jvj8VR6GSbyMOHghD1B6S3sLeY1Dru+ilrW0Uqk9sTB4sPA7e
IcLOmtlolGNx9IWInA7GItXtgnoGcu5RXPJVpYPsktuUsDgOjc6UbZzMOAF1
JMfv1QksxPFr/DVsrXTuB8tpl/XxqKXaJe/rIymQd0/7P9Sx0aONDxj+8Rkg
+dJV0tzEQWPW7vNOGGTCMR21eiwxEWlWGc2or2XCecPnhiWkZFS5/bPG1E8G
pktlrm91yYgs8KAc+iyD8HVOJg0jXCTursgUnMmCHQ1B/zb+xUOq80On2U7Z
kEdovxB+hY+Wp8i+nerNhqs7XWYzzqYgI+62SO6RHIiysg7v46WiJ5JwG9na
XNCqvzHrYo6gW9PB5ZKHufA6aXMQOSAN7b3IWm3PzIM40Ut3lZ0Adfi/+Gpi
lg8dsuOdiy2EaHIN83HNb/lw10p58PCkEHmyumI2+hXAikhiJ7tbhCKai+l9
4wXgXSl+N9IsRj+7ibf7nJSDCT9KpzwnQc/E2zYZnpGD4+iGNHGpBKXeMyK2
nZUDLUEzEqyUoD8CS/q9LsghlyXqX3BVghzYt4SUKjkYhBW2JNRL0JqyTzdc
m+UwQ30gdn8uQUZGsStJw3IYXuH8tXsZhq4E2uu/+SCH+YWTSTUWGPIpGn+v
0MjBltjyTroSQxmk9Ns2WjnEGvs9/3E9hmYpl4KsZuXwWseou+iCoXFebzZx
GQ5Ph4tTDgVh6GRDWVL3Chy0cRFqLzqGnAgsOm6Jg/ng+ljrUAxxCiZIS1bj
EKj6fe/f0Rh6W21+Z+EmHB71PCa7cud8Iy8qOxxweB9wumZJKoZIbsp8mRMO
CzoPrHsnwFDUPadQAzccfNqHiOePz/Us/AL3f8KBsf1aDj8DQ6WBrT+c2IKD
FPHm0bIxtLUo08SLgoOS4i7ckI+hl6/8J3SeOKBG3agOx9B/t7lYjQ==
     "]], 
    LineBox[CompressedData["
1:eJwVl2k41N0fh4coS9mX+UmMNZUQbTwxH2XfSUIRytZmEtmZyS4xRZQWo4VW
j0qlEqfSos1SpCzPRHu2ZCuV//xfnOucz3Xf33PO9825rqMRFOERLEyj0XoE
4//zt5HfTjYhYxaCpV/k15cWkWfiTKzKXjJpMo2+CqZXmLGSAyFUWR+TVlIe
ob34HjOhrpwmUvaDSasTk41WbGX+KU51/smbAbaGvMOsj++YdSIjP37w5AHd
Yw1ZGd+Zav8ssP3O0wKIbd3bBhrOW/y+PWmuDXZqZ3OIhRCWr24yonVqA2Vt
JxbdEIKLfbSKtKIusGfLAv9yYSSvvzugn60HhJeb+CeIoHu3T2HYrsWgpbzS
TZ+eBZf2huEhngn4ytrOG3ZKIeU/Px+pcRMglS8X1S6Fqs/jd/UdlwIq/JJi
c2nITukVhI8thVHv4mfJIjJ4pb5/WZ/9csissv8774kMfMPXxbePrARXVkFl
noUc9kUO9o7ammJYWnHG9q1yqE3IdJQ/bgoo7rprXiSHeXk3Vd1szcAfiJ4f
3i8H/pV59Y1H/wGDVru/86A8Qn9/mHHHygJctVunpB8r4LBoyvbOIxbgVcdM
xfcr4LEUve3noAUY/Q2TITKKWKjhUL78CBPDDwqCiZciJjTXa3fsAZrrZp6L
7lYEt+KUd2gZUKWT9rT3jyL09Idzx58CvANzyprmKcF7WfaYgoYlmn/d+TF/
oxJu2d5+6P7UEow2zaXNrUrweDZrij9mCfa+qs8rhpTwzc3TkMVYDXaYQqya
pDJUfQeK86JXg/efzf1QS2UkbVcPf6q+BsSpOuRzhTKUvm877uuwBgxRHwcr
oozK6JqWL1FrYDTrtaNahzJ6kt3NxJ6sAbdNy8NpJh04kCppHWWFYTHlBXkb
6XjUo2QhfMwK5KdOaloEHS7651n1963A3VOmIL6XDr9HzW2m8tZgHFY6VXuG
jvcKW8QmzKwh8yAz9dt1OrYHTZhVB1mD/PUMOvuIjvg/83gGV6zB16r98PQT
HUKOl1u/vbEG72Y+y3iCjqzDVqLnhGzAUjJ5qDuTQrHJtq1a7jbgvTI4WaNJ
oTq8Zil9WJDVI3tTvCj8c8MxtE3ZFnyH5xlrgyjcE/nvyEGmLWTajpdW76DQ
Uio6PTvfFm7CGhLqqRS8Bw4veXJd4GvGOOjtp8A309+S2WML9GZ31RVRGGzz
aBQysIPbBfnXBWcpRGt9nKpbZ4fmKtElrVUUfrPiDBKT7BCQeb7+eA2FtLrZ
gaZn7MAaOZU4Xk9BcjavYPyZHapMhgK7HlI46GPy8OqoHYY1P4S7PqegUvFw
kqVqDyNrs3zXlxTKRn0WGVjZg/bu77OuDgp6qwf8vm2zB0O+VG2im8K/+Wzu
2QJ7yPB7U070UljeLX8/+LY9eNaD/a0fKdQtrBjT7BP4DpZBhV8pWMea6fEl
HOAmUdPVO0Dh2YPnvseNHdD8IMenbpiCp3zgfl9fBwx/dW7X/UGhM2C0Xnmv
A7jqI26qYxSCKjNHXp1zAM2h4dGJcQpfplR0DrYIePEO08oJCiz7yvWuPwX1
nB+nHSYpTBZZ5szWcARe3hCPEuSU969qG+0c4XY2NnShIM80DhvKYDmCv8ut
boegPi9lSsPqsCMYo9ekLAT7Kz7P8xQiAm6V6HN0lMIxFc3Muk8C/ri1NH2E
glbYtZsJ0k4IWGTd93uIwvlrdv0rVziBu+m2jpCgP+MZXWrj/k5gHIgLP/iF
wk23CPerGU4wUmdcrvpAASeE01iVTmjmXpje8I7C42+Hri9ud4JbdpR3YRcF
V9MFX77+cQL7lmG9z2sK7Rm1c8/qOIPRPrDiYgsF/1euLsHOzkDS3Ef7nlL4
oNHH1ox2RrMBZ9dkA4XRWvGPxxqcYZT3Tj/uOoUEieN0335ncDtX2O+vpCDs
beSorOAi6C+p2KCcguwPr6oDm13A0Ex4Ty+koOan4ZmZ4wIikvKqIIeC/qNv
E4mXBX62dyaPTcHuKJsZNi3g/F9rI7ZR8BJ17PPTdQW//FnSkgAKmyMUM9c6
u4J3Oz0n3ZNC8przLyyOuoIr6s3q+4dC7qWoyKX3BP5LpY0DBhSOKDOVFn5x
BaNzllu2BoW3Y18qc+a6gSj5x8WIUhhvTB6PDndDs4KwsMFjOv783fx4ONEN
RpImfo036BBZal+yjesGhvBVlYlyOmRPyFsE3nAD+9KDIfE0OvQjz6Y7ibqD
GzwrXsqUjs0qrQpaZe7g2xi0l+YpY6vrjY/Hq92BMzN/h8Yog5V2rIb+2B2k
hBl9f5MykgdDNkoNucOIPXR2qaEySu5Nnfq5ygNVZWJ04UYlNG/VMWnu8AAO
Ks33/ayI16USoo79HuC1nI4JeKKInldD7Q+mPUDbUeM7dUER/Ra34m/rrsVw
ZILx0A5FzJJ3vVcetRYBa2sqWwTvucXtWPckGU+Q0BWTRe3yYLR+eXFCxxMB
nOvclkp5CH3xdSJmAv5ikpufIY8GJXPbGcGecGuL8ShaKg+HSCHz7JueaG4q
vtyaIwevBTl6h4LWgbtg5LkuQxYrMXXmesw68D9uu392WAbU+u1aHbnrEFBS
waoiMuhKc1Gbe2MdjN6GHnTfJIMgvpxCmaQX2Kbvn9QtlkZE8dHpi9VeYPwx
bD3aIwm3ytlJLxq9wK/Ym5PEkoTxg6RfQz1eoD3R/R0hJInxkU1jxuLrwa/W
2Z3FkECii/a3Gr/14P2KKj+wVgxZopfaG2Z6I6Bz53mv/SLg7a671OXtA5qF
8uiZ05PMn4MeCw9tF2QH+ZpK3gTTY+uncme2D9iqImOLjo4zRQJleHUVPkD1
peyMfaPMMJegg7xxHxAVMZkmn2Gm0YKZMVsKfUHbyLFRvdbDrO9xRn/TBtCM
57zIKvpQT/ftrT3dtwHsU890z/39VM9q22PqNyHgVitjr4Z/rdd8Vmr8Qm0j
2EfTtdh2Q/UZN79rV+3YCKgu0QorHK13KTwkHiXpB9I14Jty8299j31365SN
PzCv5No9MQkiV/Hnl+9Gf7BjXkcYP5YgNiJqWrd2+SMg/OXUzixJcqnOf3fs
MX/wVOYUOEnOIYkmfPmx7/7gm2pOW8+RIdS8Ps/BY5vgJnW3xstQniyMjdrG
igtA1UVzLeE7FAl2jB8IagrE5yqpJy6TWoRh2XGc/yYQK6vtCj8Za5Ou5ctd
/N8HgjYkOvf8Dm3ioTlS6fMzEKzB5k8X+rQJfoaz3LSCkBVz0aq0RYeoVvj8
MI8JAmtzu+eia/PJS2HTn3T1zVhZfL17dskiYnlrQqRp5xaE6Zc93PB1CZGs
eUeb+y4E7GdGKq5OZmTRd9udq7LCsSUkrOOP5mpidlOFmAtvR7PnDdl0TVvy
r/0mnYcRO/F+SxjbzsmJ3JGQ+SubzYLSHotRZzl3olJT3ll1fxd+C428575f
SzRTp3bdou+G6kxLDyvx9cTfWPxgZmgUtNff9eEt8SWyC5xPN5RGozcrTddq
iR+JMHeN2D6yB92n/mpbMQOI1ZFM/TSDWFzQV7/c8iKQNMgln5yZHgfhxk91
SWmbSQxr8Umntngops165bI8mJQpyhcKSyciQDV3gfGLEBLTcd1Ca3MSIg65
fIrcF0YaermdV3nJ2E29qy5fvJVYtWgJi3Wk4PQb6eHLjdtIzc5brL5CNope
SxreydlBsunJb+KNObBjeBxNNIwgRi28E7bdHFzK7LYvSGSR4alSvfG0vUiT
Xyr9y28X2e5w68JGjVScK5cebDKKJHcqTPZNPklFyLKekxJKu8kTvcebncLT
UFR4bmFG/27yfa6p0F6RdORN5Pouq48iA/PEp/ovpmPukmXVlqejyZk1owPS
Dhm40mBeuy5+DzGOtTAPG81AYUHXnkdBMSSh+VR6bEEmeJOrl+uuiiXdJR8O
bjXMgqf9oetZsnFEMSrj94GOLERuJd02P+OI+K7Vm3btycbe3AluU0s8aU30
U8vQyEHH89wz12oTyLVfnicTG3Nw4Wmfff6pRLL2WKj6opB9+HXk2jd6QhJ5
5PRmUkomF4d17RRpwclknBHy9HxlLpLbBp/kMFMIM7QpSM9hP0be/zsxIcEm
/rXFXp0j+xHcU1Tvk8ImK5clrLHh5uGB8MoGkX42aU9YvVC0IA+O3pc1vw6w
SfQ9cdmGQ3mI9Qzb2zTEJldcD/dYHhVk/n7rkh9sor/1Wpx5eR4GL1x6azjF
JozSoX+X1uZBX/An2SDBIeLiW1S1PufhouSq0St6HHLWddGM3q95KPp6N+7w
Qg6xKRr5whvIwz/n42nJ+hySpsW5ofYjDxoJqbL2Rhzy1/yEh8rfPPxa9sXy
vxUcMhLZkSWrkA9PsdpOSVsO4d4sjWhWysc2Yhf13Y5DDGmhXvlUPsq1Z0i9
duCQ7fvHtOao5yPl7LTVSRcO+VghVy+2MB+Dp6XurvQSnDf45swj/XzkNEwH
qXlziNaystwMw3wsF1KdKeLLIQH3DH1FluUjLPeVa5Of4D5iE7i/QuCvZI1X
b+KQ46518/ea5WO8dtmJkkAOWVWULmVpno+7j7Vt2Zs55G2X09g0Mx8akubf
g4M55H8d9U/S
     "]], LineBox[CompressedData["
1:eJwV1nc4V+0fB3BZoSEjicr4Vo+k7DLCm2T72rNsKZ2Db/be40uipImMjPIr
GspMJRmlyINUUtFTWSUhHut3nj/Oda7Xdd3Xde7zuT+f93VLuPtZHmVlYWH5
SD3/vcemFk30vGY0p16vzKzEkPAvCVPULfxb612NiuODKBKhaya8NhcOaynJ
htz2iyAR0VjKwl74W0up6LrKWDCJpYsJpvMFbPi6l/aRw5dEI/vU798FAijF
kfrnR0hsU9+l/6uAhubWgb25B0iUay7Wz2lsR1aMW8Q9NRL7dDrlWN5vx1ze
3JeXKiTohkEivBt3wpVBCq5VJhFt92RCJlUKXIkxqyv2kPgQ4JB9/OQeXGHd
bZkqRq3va578WaAILoX4lhIOEjEfnRzWzyriuKp4OSs7idvfZ5/IGCthi9J9
dw9WEnwLUue8Z5SQsX+XvdwKgR6x08rDhvswBzJsbo6Ao7dNeN+UChruKj/Q
mSBwyv/H0LS+KvquFSV9GCPQEJFiLJCniroGT83IUQJbM2q3mOurYQPzKuPZ
NwKf7m591J6jjhp1zCUPETi2+A/bQ11N7BNQOd3aT+ASRwz5/rImssVkwwrf
EGhbL9w7/0MTXyrmXWL6CEhLGJXuu6wFBeklCf0eAn8k7bb3BwPFwfezOLsI
nCm7Zn+sEAhPtGWwdBKQkplMn30BSCm4mC+/JGCvnDojKKGNxQJFUc4OAnX6
9S0WL7Th6sw+faiNgGXH6oVPM9poGBFccmklMGZuLcsQ18HQUzpvdAuBLY4T
FzOCdKAr6WLZ0kwgihTzfiF2EII5m46nPCEg9IvIczQ6CFffys4njwlUBNW8
Hgk8iCMh9noslAejLdS4nh8EJ9sZj9RGAjibsOZQoC6KTG/6ddQTaB0U0mTN
1cUX6RZ5Bcp0mXLGo6e6aLm2PT6njoBTa1evqsAhGBQndYbWEghf2lqw9+4h
rH2xeZdzNYFVxne6x94ewvaEW96fHhBgXtLluLFKD+wPR9W9KF9UJE7QLPRQ
zPx4IfI+gSrvGiXhST2QT5Lleu4RUK82Pta7SR/9B+hcAZSb2D9eztLSh/k6
/8CNlF/nc6yszdRHcN4Uz9G7VD0nLsk/f6APFe13yvyUP6nJeKYM6oOdRWm2
6Q6BH72W7av2GsDksJKKLOUg2teFRhsDfBczqxu9TWCREbY3MsoAi6bN3Tco
JzaudVMtMcCJNy1xJOU1awvOzXYYQKo7uVWBcpaDYsu9aQMEh8gXL1YSEClr
mWNsMYQM7dem55SldCacxghDmJQaPfOjXJkZe+b6OUNUDEiv6FPe90Hg6dF6
Qxj03eyiUW6ULpuRHDbEeNa4KhvlQ6FqUp94jHBXnk39awWBjmcvHfMUjHB1
krOng7K1gNtpR0cjHJBZw1FN+b3r9KNN8UZwdRF/VUzZvSJlqueGEXokrWUv
UB5ZENmR9doIcnvuSJ2izDCssDObN0KxpVZdAuW5C9ppayWMMZTI9iWGcsyX
noZ2A2Ow/r1S8p85FY7/TGYYI9JbkeW/9RkxCxK6l4whl3VlKpXyxpcZ1qse
GyOwam9UNuVcEcmUxm/GELf5ml9EmXb8fm0Erwm6hO47VlEuv28wrrLfBLO1
p261U1ZgG9g262wCua32l4Yo15r7WdxLNgFTg0N0hTKusiYyKkzQvC9CWYyq
T9vY+Qd7+kzQdjD/mw5lM9VdI6NLJuB8ZCV/gnJfcoPo9R2mmJQM5T9P2bnH
jH7U1BSxPCNpTyn/IzEcKxlkigb52CszlEm/4Hsfc01hHSyovZs63+kG7q+5
zaag94dFe1KO4MkTdhw3xc3wOMtCyqz2csabBOmQKp5v+EyZ77ft7bMedHQ5
e1n7UP21zUnCOiWNDk/JC8sPKMu0jv2JvEPHF5VKEXaqPw1yYrWOr9ARO3aj
7DplWw7jYaedZpjTWiPMQvW3h9/GFCtTMyw62Mw7Uo4+WP5KM8cMy+nJ60Sr
CKTfCvRXajKDUli/Vizly5u0hKRHzFD89/fP3ym/mxmpSBM1h8i3pYBmar5m
26Nng7zN0WUR2lJMzefSskfbZKQ5mm/SfXbUEGBXMrxCnDFHTSZ/3A3KfFcF
NN2qzVHxqH2inppvGf/rSSYcFsg+sL+Lu4GAYtlpu1ZhC+o8XnaXUFYb8N+l
I2MBmagBzUMPqf/T03i534pavyrKIoPKFw+RbkFaoQV6RHotDal8OmFW/TWv
ygJparbnWJqofkzMrRFuswDT5oBqPeXoH15H1v+0QEXO8l01Kt+uNC1cmz9g
CQOnQ3R3Kg+7TuxQ7Oq3xHo2kxyrVwTe5PNwGI9boiEgZBRU3g72/Ox7tmKJ
9Nr15+WpPB7XrAuv32mFCq/b81u6CawWMGsqDbSCOU/GuCiV55r1oRZRG6wx
t/NJZ+0gAfHukVdXd1iDne2c3sxHKs9GHE0eq1kj8NnOIqXPBJqFNPTZjlpj
OliP7dEwASP/VRqptdZIe15MZx2hznNXmtR5dxtkXGXw6EwTUMFCyYMQG0SW
OOrVzxDYbEfS+tNt0JCbbK3yh8BAIn2baLUNGLrFQxr/UvP7iV+wcI0tWg55
FAWzkPC7mLNys8oWaQ+n0/LWkTCvWBv1qt0WNfo3zKx4SSg8i/r356AteNJD
X6/lIzE75TKjwG0HQbU2zlOCJCLp28dqnOzgZW65oUqUBJPjVl8zpz2qeH/Z
V0uTKAhovDVg7wCjUV6JUGMS8z8spc+TDmiRtEqNMiVheeJbqWmsA6pOFnMl
m5Fgd9tQ0FjmgIoYPv0CKxLH6e5ZBbMOkDstnzd/mITcLs4Qz2xHOH5OidD0
IfFo0BTjnYcRriIjuzqLhLDjUEPx8GHESpm3k9kkGL3Bqk5/DqOqmTTtvUBC
siNf4dW2I1AKqFhXmUMiufbX9ts+RyDOv6ybVELdJ7LPcweucYLOhlbt+loS
g4Yfuhf0nIHSK6M6X0jwly3963jEGWSj0oTGNxJ67NtodSed8W/XRtqBURK3
Gp0DQnOdYbDUI64zSdVH8ZPAzC9nPD6qtydwkcTmrcPWP3JdkOaf2+W70QfS
oYEEI8wVrxJYj9029MFR4/AJ9043CL27VTNT5wNx7f68T2/dMCXddj630QcD
+/bRnb+4QbeyfL1ekw8sJacqHObdwHzs2VHQ7gPMezPMae6oUl+nG9Tvgy1l
Dr81QtxR7PKMeWnWB3+zqs4Li3nAyKfxer2SL7Tr/rB3+npCSfO0+4YaX6yp
+cwi+tkLekasoRVP/bD7l77vAaY36H/KN4nGMaBWK/JYg7pHhW97/KZO/CQq
DV12tPj5Yq2eYvW1ZyfxkGfDMl8qA0WSZ7vtYv0hUlP6/vbTk4hra2a7pBQA
yYSFk3XCAUjP+nDGZykAzgrcWSnHAsFKKn3Y2xoIvl2mxc35QRgMTPncmhwE
Pw0zP3IqGNv+0lNpcgiG7uUUmcS9oTA4OsSvIhGCZv7oIs6kMNj83kA8WAhB
CGNPkUlvOCY7cj8a9ISicKNANitvJFzTOdVH88MQ0v9Ak+YRBXq8aYpidDia
h868v1cQjanpvyQX6RHQfU1j5eqPwYB2/Nq7WyJR41vHGM6ORXNAnPLnxUik
Cke/DVeIg67Oa/XJV1GQe11wVf9DHATLJ5t97kVjciFfajYxHs5Dw5XR2TEg
jer+d0QiAVc6EjTiFWPxsEzx1NzzBAwa+MpMl8TiuVSbh4l3Iua/yxzn5ovD
L1HVVfHsSeD1NtdVDY/DxFbuhfGbSYgNuW+VPR6HkoPTE7xGyTjrW7A12C4e
CqGaGsenk2FfquyS8CIeEV3XkkLPpaDTM5GTRyUBH678k3VClgmFP4WO54oS
sDEwefFsPxNvBU+J6wslgvukjsvJ4FRc/NHJ6xGfiO5Ip23JEmngXJCkl/9J
xP1/rYsi29Pw/Gml+PiJJFjlHhPb7XUKxG2zXmZfElpN3s6t35AOiMmOmxsn
Y1bc60V5RTreOPre9KlJhtaxTncpo9PQu0gwQmkpcG64aPt+6jTYgoO5Ki+m
QEU54qDemQwYq599LM/ORF+EjjTHuQwM79tMCHEyEdTEzdd8PgPb3w4KLaxm
4q7ZpUHtnAwY3JHwb17DhMyJ+2EapRng2Ri5306ACfH8n5VKDRkYVNu/FCnJ
BDe35xba9wykc57wbwcT1812sw2NZoB5avlghQ4TehemRgomMqD165nQOV0m
Emlx1dt+U/tZP/7oiAETyxpXLUWWM+Drli4+acbElH8/k08wE66ePSKbXJg4
U5vv1yWUidQmv5UFVyZkWY7ZZm7ORH+Hyj+f3JkgT8/Q1ollojfXsqrci4mv
ZfyPuKQzcUY+11XTl/rej7clrTKZ0PyTQ6cxmKApF6Yny2Zi+W2LBpc/E65N
so7sypmwvZMr1h1E7YfrD57uz0Qamz5/dQgTeWaNf8WrZYJrryhnbhgTBy4k
rdfWyMS3j8ILsRFMvBswmVnRyoRDm9avo1FM/B+301ap
     "]], LineBox[CompressedData["
1:eJwVjnk41AkcxidsmXpypkjubOQqR0mGb7kZaVGPECFXWeO+r/EzrphJRCkZ
SrYS1qbcvo7dUo+7lRIJeVqbmJEjNNb+8T7v5/3r8yp40uy9+UgkksNm/u9/
uetUc59Fo03sDpkZbAkpi9YxLRk0JvkBf+HpmtaoHbM+UiWTxqTMnjlN1/bW
2Jb7JIGSBWMSQ+pARuhA648CwvY7mx+S6pVRo3SitUWAu7DAFockTtWtbh63
Vfa4qgWHrQQgoWCnWsuPp4Y65+fYOgBdFUGLEhKY+OH8OaElHRAR1sk0iZfA
6s9Lbeo2utDnXz3DmZJA0TWVXP/Fzd1axwis3Y2v5bL1Jq2OwCH+RItxZ0l0
9j8TM8TVB9L3WVHaM2n0Xf/E32xqBMinQWtzVkDIIXaYhZlCncxYL2dEBUUX
zlbneJ0Cfa+NLmUTXTRqjPolXsQRnLoiVRqGDJEd2vL4vdM5kB8wQLc4Exyz
Gh1YM3eDcaHzlt3pluhtEzPr2esB76eSZBOsT+GJhmWB3sCLkLnWxP2+2x53
1H0kSX/0gXtqTxjuXxxRjWMRaJjuD01DJc/UxJ3QoH4vUvgCAENTpU12uWCV
lbvyX7RAUPS/vPpKzA2bt4vwRDOCoILec9ig6gLurbs/Ut0RDIXxf14poXii
IrEW3CAZCuR3ny1XOF7opk2+luYbBjKNDkWUUm8UVbW911kcDit2G65++r5I
o9jRArgREMcd7+xf8EPTm2nqKZpRsOExs0U07xJ2iiWUbmVEA5hNaXmcC8DI
II1S6t8x0H3awiFGMhBLJMTz+ITjYIKd13a4kYaRw0+NlLzigW1xQ8q9LQg7
J66O/MFOgErx7Kma/GA07VfiExxOBH4vGZq3XwjWBTYETeYlgYT91vlQaihm
SCa8jdGmAzX78vU2hTA81M++YzFKh3KayKg/ORzn14pVllKSgb1/8LHFbDgG
WDc8clUggLNaYareHoHN5TpXVl4S8FLOrMPnQSS+VHnhRfVPAc0cXimTHoUc
6WNbkgUYELWWd73uTDTOypDXvlQwYOK05uARwxgsM/k2K2ydCvmCI6F08VjU
jjKi+H1LBZ/wmmOKP2Ixtu8uIyo3DXT4tmQkvonD0cJP1y5ppUNfAb2w43E8
SoSlrucMp4Nnou1+t/wEJAefdA+OyID84D1jxbREHIg7L5uqkAkVS/XbijSS
sHbVsTSuKxNSHZSnnUqS0OG2r5yazxVYZR16476Tjs+pb1eERLJAs8woKzeZ
jkvyPq8eVmaBmaLNSaF5Ohr79nqqWGfDmcGZDJpLMro1FZwd4WaDa2XZcV5v
MurrxZqYX2UC58O0Ro8hgUOxJw/+lMuEtrtzPz8xIjC8nSzaeZ0JEf2j8oVA
YI3djbETt5hwm+G/x8eUQPVLtdGU+0yIFdMX5tkQKF88V6XbxITL5CRVTRcC
yeSL+5Q+MyEw7/A2VjSBv9mp8U/MMEFSPGZfeCyB5vncf9izTGheZmu7xBOY
okR/JrvABKs9GR4H6ATyKHfs9/KYEPZ7U1drOoHckOF00V0soBbRO+YLCLxa
X0zr282CyY/500M3CdQi+Z5lSbHghXLa9uZbBAZkLyrtlGOB7utlx4xiAqfL
xVoFD7Lg0Rfxbwrlm76vb8ueq7PgGHVNRvABgUp6JVmpWixw5jVafn1I4IV2
LWcBPRYYMV6wGyo3/wguQ8dRFtybE+9hVxNYZNdyINmABeNvjq6n1hBomM8Q
OkFhwbygrtqvTwh89566uGHMgjFbQReHpwT+BxQqjsk=
     "]], LineBox[CompressedData["
1:eJwVkHk01AkAxyfH5loMW5soWdmI2HW0HYav2LFE1pkOR2SkhnHf55zmh5mh
1lHJjDOdFh0UHRSpiDbPEVaeXpeVEWpZu/aP7/u+73uf977f99ULYniEyJBI
JM8V/e/vpUsuVNqcDdWUpETKpCO6KsnCQfLcVt0ntdCFSUei8hRNSzJh2zlk
qHGWTUdKazVJTjJra0oL6rXn0/FPEcv1i1gW9RMejtcL6GiVk87OijXx8bV7
t0E1HRt3GznOiPUhKqUpG/TQsa+//eO02AKvKroTfjUKR8aY3wHVeQvIjExK
8kzCUfdm/p7JXkt0dVt2PzULB3nR8GTYnCX8dSsM9m8Pxx+6eVYTTtuxJ3yk
OM8+HAfDvJP7pTuQqcMf5PmHI3RpUrbFwQYyH86qVBaGA/ks5Z9jHSAdVrBW
VYsAedanLj94H7Ibr5X6KDFgcyvRPU3dC8nKD/0bVSMhjmm9/NL3AMZdc/SM
f4/EqNNI3yLVHwtMoyZFzyiE7E2eCuo5gnVVj/yKlKNh17wg1xNxFKL6vtWH
O6OhfHOcpD1Og0CqWiSfHgPjGccI6+wwmOY456v9EotdTevvUmToUA/zza9W
iMNVpwCDh4wIDIlj9xd3xqFFSX2ZzI9E862QtoEz8Vh/s3q4ri0Kj+MPLh4O
TsB3rMWo5nUxIOlsOT9GSYS/uWIBLzQWPh2Tq33XJoFs5FrZXhYHH+8Sn5bx
JDAobgy6NB6qlbW3O+8kw6GEZ8I2TYRKUDl1pygF7Rrp5V9xkvBE01tlZ0wq
EiK3lbu8SAazVKlR2zMNkjWap2TUUoE+fnPH5nQkDFy30Q9Og5K6VH5SIQPt
r0TDDeJ0xF58oUOMZsChV19GYSADS1z3bVTfTNyMaI6cOJUJ1RD52sSuTPDX
pQ8mm2eh8LLkuaNVFn7oFZ9zHMmCuHq5zrE2Cx8Xywzn2UxMXMjnHtFmgu7c
fPGwHguW7KHhRQ4TLTUWOZ+7WGg+UsFt/8JEl2FnsEsYG2+NapZJNBZmtHeu
YspxECu620B5xsLUBsXFD5c4yHBamq6xZ6PK/tOUmjMXmp9PJMddZcM80YZy
7BMXBqPkpKjNHKQ8q+AknuThdPGGwc58DkZOTxYcN8tGYNLbpxr/cLAmlruU
P5AN8p8pgTlRXChG7QmIiucjTnSjxmuUi75Uv41cPQIFQX65rl48XPvbqzz1
EQFRXOhxy04ePM+G6hrTcpB76VZCsGU2OlwGP6uq52JXScOF+7XZmN9Ee3zh
Si62mXsthnzLh21oT5Chcx5W6ZmRp5l8+N8u8hmW5qF17UPp+QU+dlil2FNF
ApyoyftRcpRAf8qerfInBTB6wBvl0QjE3Vckt/8mQJdLaG7EMQL1bsWjdmdW
cuOLd7vpBEyOX0uiVAsQUBtW3x9DYFPZ9FXL2wI0MazpKiwCiopHdfTfCCAo
keUnSgicdzOWffVOgO+jKR4BFQSohdK34qkVvs5bh1pFgK2fdWPjrAC67E0N
mrUElinnPNYvC0Diar2/UkdAGj2QTf5GCNiFsSfvrPzSVMZ4tlaIB2OMQ0/u
ETAjhfoItYQoTnO3aGgjQM+b0/9aV4jRscrJzA4Cr2s07ihsFUIxkOul07PS
99dgVYeJEBytAHPZXgL6VpJcrpkQBQZk8rs+AoH3zQ7KWQnhEUjqvdG/skdh
AW0/CVG5mVJ/boBAqVvrFuYuIbppHqc4QwSsCzmqdhQhumZsE+gvCQy9dJn7
11aIapH8Ic9RAv8Bt6VjjA==
     "]], LineBox[CompressedData["
1:eJwVjVdUkwcARtMYEaTKcjAqgmlVRsESKQ4CH0Kh7CMirZriQBOwYa+wAiRk
wf8ngDiqVEIUsFgF5ThAwIq0tlQR4iiU4VFqHRjARBBFSe3DPffhPlz7PYkR
+6gUCiX0A/97VPsuxJ896ZVfTLGlFHCRUpPF8Ku+4/2+3XrHQzEXPGMN26p6
xDtHt/ZIB8lFTnsthVat885kxZmLjnHx/rAw9I1yDuJd1AbzL3HRTtPqdEoL
sNQnxi3GuLDd6BDwUknHOuuAa6tY8Qi73zkxrmRA+xO5N3xdAlAmNP4qzQ8k
W0K5Oz8JZrqoxrKYMFzJ3xTc8CwJXld4m/NMI+EbGJrp1JkMZWr7mcFvt6F2
UUSY87kUDAcOqWf8o6Hi9Nqz5KnYF5yt2XN7N7Jag5Sm/DT4tLym3U7Yi/pr
FhR2XDqMLz+k2DxkIz3sG9Zzvww4vQxI8JTGwWaoIkbnlokNzda/MKlcbNeF
cJzMeGgI3PnZb4kJmGyODKGN8tA233TWTJaEWEHU4O6/smB9uXag8XoyMtTq
2LGmbKwQziS3WKZi56eBSr0qB9FuRuUSThpUK02az5G5MHMIPdlZlY78xvDu
8tg8JDLDE7naDHh4Fsunt/Lh94PEuciFB1m4dzDJyEenOV9lIMrCdrfMbXfM
CpCZ9Lkq5F42lh2cymuUFKB6sUUF1SQXZzY22dVMfuh9F73oMXlwHHlhOcgt
ROej0oEmJR/p3TEKx8FC+PXSqYZ9+XhRJsgIDBTgckJL0khFASKibJvqrwog
s+T3Z7sVQhj9Op7uIsSaXuXxgKFCVHNC+cM1QkzMVK2eKhJA83WwPs6mCNyg
ltMseyHmJYhnP5YVoa2OUTLdJcSCCq8tWn0Rulb/HhMSV4QH7xkrxxNEeGmz
/iMBTYQH3r1xrQMiaJYZzbz4WYRbglHqzc1i1Pi+0pgEiSE18rXWXRXDjefF
jH0lhmvZUgnLQ4KcnhMi3gEJTrIcUoZqJRg6+rh8v6sU/pSRWy6LpFicJn5X
1ifF3ZNW+R3FUhglb9qZnCHDGpI8G/9GCnXud7Zi+2JkZ/AZO5JluPA2UpX7
RzEmPJY6WD2RYUslZ7kTuwQMpqZyLLIYN0L6pxeaEojxBdvgZjGm7Nh/1p8l
sJvsOeO+sQTenNt7VgeRKGkwZLufKkF06+GoAS0JlbotNdOWwDr3HF//Ujkk
6xv1PQSB+zmbHOcekGMJ78CVNjmB9A4js86DctRdzMisLyVwPvzIsM8xOX5l
MMeFFQSc91/IYtbKQXXpGv6ykoBd1XjD2lY5+Cv+aas8TcDIaO8n9KdypBlb
5sZ2ETgV7jTn0XM55gTNeGy9ScD/kPaZUiNHuXRY59NNoIheeMlWJ8f5uTXf
26gJzDKPR1jPyjGh/2JHdz8BbUqf1GyRAvtfBW9Y+4xAaXNVYs8SBd66uU7Z
jRJwpXCiFFYKyJLNzy/QEOCSk/QFyxWoG+tzeDJB4N8686uGjgo8frrP6uj0
h99Yf80NZwXSVgXeE78lQHevJsSuCtDYzmWp7wjs6nDdTnNXgD6iNQylkJg1
fI3rHgqcs7/fuZ5K4sfw9lWCDQr47GouWEkj4XlItNCHqUDv8UpPCwMSfw+G
TOq9Fdg1lD+tn0fiPw0COcM=
     "]]}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesLabel->{
    FormBox["\"B(G)\"", TraditionalForm], 
    FormBox["\"E/h (MHz)\"", TraditionalForm]},
  AxesOrigin->{0, 0},
  AxesStyle->Arrowheads[Automatic],
  ImageSize->{690., Automatic},
  LabelStyle->Directive[Bold, Larger],
  PlotRange->{{0, 1000}, {-630.7907009743465, 928.9999856938775}},
  PlotRangeClipping->True,
  PlotRangePadding->{
    Scaled[0.02], 
    Scaled[0.02]},
  Ticks->{{{0, 
      FormBox["0", TraditionalForm]}, {200, 
      FormBox["200", TraditionalForm]}, {400, 
      FormBox["400", TraditionalForm]}, {600, 
      FormBox["600", TraditionalForm]}, {800, 
      FormBox["800", TraditionalForm]}, {1000, 
      FormBox["1000", TraditionalForm]}}, {{-600, 
      FormBox[
       RowBox[{"-", "600"}], TraditionalForm]}, {-400, 
      FormBox[
       RowBox[{"-", "400"}], TraditionalForm]}, {-200, 
      FormBox[
       RowBox[{"-", "200"}], TraditionalForm]}, {0, 
      FormBox["0", TraditionalForm]}, {200, 
      FormBox["200", TraditionalForm]}, {400, 
      FormBox["400", TraditionalForm]}, {600, 
      FormBox["600", TraditionalForm]}, {800, 
      FormBox["800", TraditionalForm]}}}]], "Output",
 CellChangeTimes->{3.521476189461524*^9, 3.521479079385524*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 GraphicsBox[{{
    InsetBox["", {-0.07755839488807892, 0.26697598328864025`}, {
     Left, Baseline},
     Alignment->{Left, Top}], 
    GeometricTransformationBox[InsetBox[Cell["Zeeman Energy  E/h (Mhz)",
       GeneratedCell->False,
       CellAutoOverwrite->False,
       CellBaseline->Baseline,
       TextAlignment->Left], {-0.2339003308521741, -0.2715351294765771}, {
      Left, Baseline},
      Alignment->{Left, Top}], {{{{
       6.123233995736764*^-17, -0.9999999999999997}, {0.9999999999999997, 
       6.123233995736764*^-17}}, {-1.0513722899341842`, \
-0.2410230292617206}}}]}, {{}, {}, 
    {Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJwVkHk41HkcxydHJYXR8ThKx6RNiGewu9qGjxqUDCVNkXuYyTSOmSFz/SoN
455fh9AhM4Sytdndkrtv5aHDLtqnUhpPsko1I0wUyqz94/28/ny9nvfamKSg
OD0CgUCb2//8OP7N34c54ZGeqhvQHeMAr1LoQlX+46nvNXTZRsgBgbGGaakc
9Mxc/JhF4XFA3FpFMFBqPXMqijSiWA58L5bSphT6cKbHcWpiBwdaDca1WsVS
uOwYZqYmcsDmFzvfMQUJHgzVe/RWHIaAZ22jnxQuYELnXajtYAOckhp7p1Bh
iDw2u//DISBq6bWnGAGQSxDHKx1Y4NEk2IOZBYMoIY54NS0OFPzW668OhMDN
ZwcZ1aUM6N+pejLjEwFNzuHNvoPRELdLpInpioYlWew7/fpR4NX4xaArMRb2
T9XqWKFhYFw/QLAeYIJ9e7mcrj4A9mO+iVuz4+Fs3jUu2XUfbGmwQhQ9DhSR
O2OCmvbAjZ2Rtu1JiRDpHFqqqvaHlkVms8ScZEDqXavGqN5gVV/VV3ufCyW9
T3iWd7fCOukMt9GCD9YpfZPGCnuIIBudzmKlgIxKs+ExPt4h2tEut5Wlgtp0
8mGIuSNKogQmccaPQMr9iuHsSAqinstyyNgsAG/JdAj7ojdqMz9aPj9TCFW2
/GK3VTSUluxY7v9UBB+v3PwkpQQh5fKlhXqmEohXnTO0u74PpfXWeZAYGNAt
WR2vmSGo7c3Jvj8VR6GSbyMOHghD1B6S3sLeY1Dru+ilrW0Uqk9sTB4sPA7e
IcLOmtlolGNx9IWInA7GItXtgnoGcu5RXPJVpYPsktuUsDgOjc6UbZzMOAF1
JMfv1QksxPFr/DVsrXTuB8tpl/XxqKXaJe/rIymQd0/7P9Sx0aONDxj+8Rkg
+dJV0tzEQWPW7vNOGGTCMR21eiwxEWlWGc2or2XCecPnhiWkZFS5/bPG1E8G
pktlrm91yYgs8KAc+iyD8HVOJg0jXCTursgUnMmCHQ1B/zb+xUOq80On2U7Z
kEdovxB+hY+Wp8i+nerNhqs7XWYzzqYgI+62SO6RHIiysg7v46WiJ5JwG9na
XNCqvzHrYo6gW9PB5ZKHufA6aXMQOSAN7b3IWm3PzIM40Ut3lZ0Adfi/+Gpi
lg8dsuOdiy2EaHIN83HNb/lw10p58PCkEHmyumI2+hXAikhiJ7tbhCKai+l9
4wXgXSl+N9IsRj+7ibf7nJSDCT9KpzwnQc/E2zYZnpGD4+iGNHGpBKXeMyK2
nZUDLUEzEqyUoD8CS/q9LsghlyXqX3BVghzYt4SUKjkYhBW2JNRL0JqyTzdc
m+UwQ30gdn8uQUZGsStJw3IYXuH8tXsZhq4E2uu/+SCH+YWTSTUWGPIpGn+v
0MjBltjyTroSQxmk9Ns2WjnEGvs9/3E9hmYpl4KsZuXwWseou+iCoXFebzZx
GQ5Ph4tTDgVh6GRDWVL3Chy0cRFqLzqGnAgsOm6Jg/ng+ljrUAxxCiZIS1bj
EKj6fe/f0Rh6W21+Z+EmHB71PCa7cud8Iy8qOxxweB9wumZJKoZIbsp8mRMO
CzoPrHsnwFDUPadQAzccfNqHiOePz/Us/AL3f8KBsf1aDj8DQ6WBrT+c2IKD
FPHm0bIxtLUo08SLgoOS4i7ckI+hl6/8J3SeOKBG3agOx9B/t7lYjQ==
      "]], 
     LineBox[CompressedData["
1:eJwVl2k41N0fh4coS9mX+UmMNZUQbTwxH2XfSUIRytZmEtmZyS4xRZQWo4VW
j0qlEqfSos1SpCzPRHu2ZCuV//xfnOucz3Xf33PO9825rqMRFOERLEyj0XoE
4//zt5HfTjYhYxaCpV/k15cWkWfiTKzKXjJpMo2+CqZXmLGSAyFUWR+TVlIe
ob34HjOhrpwmUvaDSasTk41WbGX+KU51/smbAbaGvMOsj++YdSIjP37w5AHd
Yw1ZGd+Zav8ssP3O0wKIbd3bBhrOW/y+PWmuDXZqZ3OIhRCWr24yonVqA2Vt
JxbdEIKLfbSKtKIusGfLAv9yYSSvvzugn60HhJeb+CeIoHu3T2HYrsWgpbzS
TZ+eBZf2huEhngn4ytrOG3ZKIeU/Px+pcRMglS8X1S6Fqs/jd/UdlwIq/JJi
c2nITukVhI8thVHv4mfJIjJ4pb5/WZ/9csissv8774kMfMPXxbePrARXVkFl
noUc9kUO9o7ammJYWnHG9q1yqE3IdJQ/bgoo7rprXiSHeXk3Vd1szcAfiJ4f
3i8H/pV59Y1H/wGDVru/86A8Qn9/mHHHygJctVunpB8r4LBoyvbOIxbgVcdM
xfcr4LEUve3noAUY/Q2TITKKWKjhUL78CBPDDwqCiZciJjTXa3fsAZrrZp6L
7lYEt+KUd2gZUKWT9rT3jyL09Idzx58CvANzyprmKcF7WfaYgoYlmn/d+TF/
oxJu2d5+6P7UEow2zaXNrUrweDZrij9mCfa+qs8rhpTwzc3TkMVYDXaYQqya
pDJUfQeK86JXg/efzf1QS2UkbVcPf6q+BsSpOuRzhTKUvm877uuwBgxRHwcr
oozK6JqWL1FrYDTrtaNahzJ6kt3NxJ6sAbdNy8NpJh04kCppHWWFYTHlBXkb
6XjUo2QhfMwK5KdOaloEHS7651n1963A3VOmIL6XDr9HzW2m8tZgHFY6VXuG
jvcKW8QmzKwh8yAz9dt1OrYHTZhVB1mD/PUMOvuIjvg/83gGV6zB16r98PQT
HUKOl1u/vbEG72Y+y3iCjqzDVqLnhGzAUjJ5qDuTQrHJtq1a7jbgvTI4WaNJ
oTq8Zil9WJDVI3tTvCj8c8MxtE3ZFnyH5xlrgyjcE/nvyEGmLWTajpdW76DQ
Uio6PTvfFm7CGhLqqRS8Bw4veXJd4GvGOOjtp8A309+S2WML9GZ31RVRGGzz
aBQysIPbBfnXBWcpRGt9nKpbZ4fmKtElrVUUfrPiDBKT7BCQeb7+eA2FtLrZ
gaZn7MAaOZU4Xk9BcjavYPyZHapMhgK7HlI46GPy8OqoHYY1P4S7PqegUvFw
kqVqDyNrs3zXlxTKRn0WGVjZg/bu77OuDgp6qwf8vm2zB0O+VG2im8K/+Wzu
2QJ7yPB7U070UljeLX8/+LY9eNaD/a0fKdQtrBjT7BP4DpZBhV8pWMea6fEl
HOAmUdPVO0Dh2YPnvseNHdD8IMenbpiCp3zgfl9fBwx/dW7X/UGhM2C0Xnmv
A7jqI26qYxSCKjNHXp1zAM2h4dGJcQpfplR0DrYIePEO08oJCiz7yvWuPwX1
nB+nHSYpTBZZ5szWcARe3hCPEuSU969qG+0c4XY2NnShIM80DhvKYDmCv8ut
boegPi9lSsPqsCMYo9ekLAT7Kz7P8xQiAm6V6HN0lMIxFc3Muk8C/ri1NH2E
glbYtZsJ0k4IWGTd93uIwvlrdv0rVziBu+m2jpCgP+MZXWrj/k5gHIgLP/iF
wk23CPerGU4wUmdcrvpAASeE01iVTmjmXpje8I7C42+Hri9ud4JbdpR3YRcF
V9MFX77+cQL7lmG9z2sK7Rm1c8/qOIPRPrDiYgsF/1euLsHOzkDS3Ef7nlL4
oNHH1ox2RrMBZ9dkA4XRWvGPxxqcYZT3Tj/uOoUEieN0335ncDtX2O+vpCDs
beSorOAi6C+p2KCcguwPr6oDm13A0Ex4Ty+koOan4ZmZ4wIikvKqIIeC/qNv
E4mXBX62dyaPTcHuKJsZNi3g/F9rI7ZR8BJ17PPTdQW//FnSkgAKmyMUM9c6
u4J3Oz0n3ZNC8przLyyOuoIr6s3q+4dC7qWoyKX3BP5LpY0DBhSOKDOVFn5x
BaNzllu2BoW3Y18qc+a6gSj5x8WIUhhvTB6PDndDs4KwsMFjOv783fx4ONEN
RpImfo036BBZal+yjesGhvBVlYlyOmRPyFsE3nAD+9KDIfE0OvQjz6Y7ibqD
GzwrXsqUjs0qrQpaZe7g2xi0l+YpY6vrjY/Hq92BMzN/h8Yog5V2rIb+2B2k
hBl9f5MykgdDNkoNucOIPXR2qaEySu5Nnfq5ygNVZWJ04UYlNG/VMWnu8AAO
Ks33/ayI16USoo79HuC1nI4JeKKInldD7Q+mPUDbUeM7dUER/Ra34m/rrsVw
ZILx0A5FzJJ3vVcetRYBa2sqWwTvucXtWPckGU+Q0BWTRe3yYLR+eXFCxxMB
nOvclkp5CH3xdSJmAv5ikpufIY8GJXPbGcGecGuL8ShaKg+HSCHz7JueaG4q
vtyaIwevBTl6h4LWgbtg5LkuQxYrMXXmesw68D9uu392WAbU+u1aHbnrEFBS
waoiMuhKc1Gbe2MdjN6GHnTfJIMgvpxCmaQX2Kbvn9QtlkZE8dHpi9VeYPwx
bD3aIwm3ytlJLxq9wK/Ym5PEkoTxg6RfQz1eoD3R/R0hJInxkU1jxuLrwa/W
2Z3FkECii/a3Gr/14P2KKj+wVgxZopfaG2Z6I6Bz53mv/SLg7a671OXtA5qF
8uiZ05PMn4MeCw9tF2QH+ZpK3gTTY+uncme2D9iqImOLjo4zRQJleHUVPkD1
peyMfaPMMJegg7xxHxAVMZkmn2Gm0YKZMVsKfUHbyLFRvdbDrO9xRn/TBtCM
57zIKvpQT/ftrT3dtwHsU890z/39VM9q22PqNyHgVitjr4Z/rdd8Vmr8Qm0j
2EfTtdh2Q/UZN79rV+3YCKgu0QorHK13KTwkHiXpB9I14Jty8299j31365SN
PzCv5No9MQkiV/Hnl+9Gf7BjXkcYP5YgNiJqWrd2+SMg/OXUzixJcqnOf3fs
MX/wVOYUOEnOIYkmfPmx7/7gm2pOW8+RIdS8Ps/BY5vgJnW3xstQniyMjdrG
igtA1UVzLeE7FAl2jB8IagrE5yqpJy6TWoRh2XGc/yYQK6vtCj8Za5Ou5ctd
/N8HgjYkOvf8Dm3ioTlS6fMzEKzB5k8X+rQJfoaz3LSCkBVz0aq0RYeoVvj8
MI8JAmtzu+eia/PJS2HTn3T1zVhZfL17dskiYnlrQqRp5xaE6Zc93PB1CZGs
eUeb+y4E7GdGKq5OZmTRd9udq7LCsSUkrOOP5mpidlOFmAtvR7PnDdl0TVvy
r/0mnYcRO/F+SxjbzsmJ3JGQ+SubzYLSHotRZzl3olJT3ll1fxd+C428575f
SzRTp3bdou+G6kxLDyvx9cTfWPxgZmgUtNff9eEt8SWyC5xPN5RGozcrTddq
iR+JMHeN2D6yB92n/mpbMQOI1ZFM/TSDWFzQV7/c8iKQNMgln5yZHgfhxk91
SWmbSQxr8Umntngops165bI8mJQpyhcKSyciQDV3gfGLEBLTcd1Ca3MSIg65
fIrcF0YaermdV3nJ2E29qy5fvJVYtWgJi3Wk4PQb6eHLjdtIzc5brL5CNope
SxreydlBsunJb+KNObBjeBxNNIwgRi28E7bdHFzK7LYvSGSR4alSvfG0vUiT
Xyr9y28X2e5w68JGjVScK5cebDKKJHcqTPZNPklFyLKekxJKu8kTvcebncLT
UFR4bmFG/27yfa6p0F6RdORN5Pouq48iA/PEp/ovpmPukmXVlqejyZk1owPS
Dhm40mBeuy5+DzGOtTAPG81AYUHXnkdBMSSh+VR6bEEmeJOrl+uuiiXdJR8O
bjXMgqf9oetZsnFEMSrj94GOLERuJd02P+OI+K7Vm3btycbe3AluU0s8aU30
U8vQyEHH89wz12oTyLVfnicTG3Nw4Wmfff6pRLL2WKj6opB9+HXk2jd6QhJ5
5PRmUkomF4d17RRpwclknBHy9HxlLpLbBp/kMFMIM7QpSM9hP0be/zsxIcEm
/rXFXp0j+xHcU1Tvk8ImK5clrLHh5uGB8MoGkX42aU9YvVC0IA+O3pc1vw6w
SfQ9cdmGQ3mI9Qzb2zTEJldcD/dYHhVk/n7rkh9sor/1Wpx5eR4GL1x6azjF
JozSoX+X1uZBX/An2SDBIeLiW1S1PufhouSq0St6HHLWddGM3q95KPp6N+7w
Qg6xKRr5whvIwz/n42nJ+hySpsW5ofYjDxoJqbL2Rhzy1/yEh8rfPPxa9sXy
vxUcMhLZkSWrkA9PsdpOSVsO4d4sjWhWysc2Yhf13Y5DDGmhXvlUPsq1Z0i9
duCQ7fvHtOao5yPl7LTVSRcO+VghVy+2MB+Dp6XurvQSnDf45swj/XzkNEwH
qXlziNaystwMw3wsF1KdKeLLIQH3DH1FluUjLPeVa5Of4D5iE7i/QuCvZI1X
b+KQ46518/ea5WO8dtmJkkAOWVWULmVpno+7j7Vt2Zs55G2X09g0Mx8akubf
g4M55H8d9U/S
      "]], LineBox[CompressedData["
1:eJwV1nc4V+0fB3BZoSEjicr4Vo+k7DLCm2T72rNsKZ2Db/be40uipImMjPIr
GspMJRmlyINUUtFTWSUhHut3nj/Oda7Xdd3Xde7zuT+f93VLuPtZHmVlYWH5
SD3/vcemFk30vGY0p16vzKzEkPAvCVPULfxb612NiuODKBKhaya8NhcOaynJ
htz2iyAR0VjKwl74W0up6LrKWDCJpYsJpvMFbPi6l/aRw5dEI/vU798FAijF
kfrnR0hsU9+l/6uAhubWgb25B0iUay7Wz2lsR1aMW8Q9NRL7dDrlWN5vx1ze
3JeXKiTohkEivBt3wpVBCq5VJhFt92RCJlUKXIkxqyv2kPgQ4JB9/OQeXGHd
bZkqRq3va578WaAILoX4lhIOEjEfnRzWzyriuKp4OSs7idvfZ5/IGCthi9J9
dw9WEnwLUue8Z5SQsX+XvdwKgR6x08rDhvswBzJsbo6Ao7dNeN+UChruKj/Q
mSBwyv/H0LS+KvquFSV9GCPQEJFiLJCniroGT83IUQJbM2q3mOurYQPzKuPZ
NwKf7m591J6jjhp1zCUPETi2+A/bQ11N7BNQOd3aT+ASRwz5/rImssVkwwrf
EGhbL9w7/0MTXyrmXWL6CEhLGJXuu6wFBeklCf0eAn8k7bb3BwPFwfezOLsI
nCm7Zn+sEAhPtGWwdBKQkplMn30BSCm4mC+/JGCvnDojKKGNxQJFUc4OAnX6
9S0WL7Th6sw+faiNgGXH6oVPM9poGBFccmklMGZuLcsQ18HQUzpvdAuBLY4T
FzOCdKAr6WLZ0kwgihTzfiF2EII5m46nPCEg9IvIczQ6CFffys4njwlUBNW8
Hgk8iCMh9noslAejLdS4nh8EJ9sZj9RGAjibsOZQoC6KTG/6ddQTaB0U0mTN
1cUX6RZ5Bcp0mXLGo6e6aLm2PT6njoBTa1evqsAhGBQndYbWEghf2lqw9+4h
rH2xeZdzNYFVxne6x94ewvaEW96fHhBgXtLluLFKD+wPR9W9KF9UJE7QLPRQ
zPx4IfI+gSrvGiXhST2QT5Lleu4RUK82Pta7SR/9B+hcAZSb2D9eztLSh/k6
/8CNlF/nc6yszdRHcN4Uz9G7VD0nLsk/f6APFe13yvyUP6nJeKYM6oOdRWm2
6Q6BH72W7av2GsDksJKKLOUg2teFRhsDfBczqxu9TWCREbY3MsoAi6bN3Tco
JzaudVMtMcCJNy1xJOU1awvOzXYYQKo7uVWBcpaDYsu9aQMEh8gXL1YSEClr
mWNsMYQM7dem55SldCacxghDmJQaPfOjXJkZe+b6OUNUDEiv6FPe90Hg6dF6
Qxj03eyiUW6ULpuRHDbEeNa4KhvlQ6FqUp94jHBXnk39awWBjmcvHfMUjHB1
krOng7K1gNtpR0cjHJBZw1FN+b3r9KNN8UZwdRF/VUzZvSJlqueGEXokrWUv
UB5ZENmR9doIcnvuSJ2izDCssDObN0KxpVZdAuW5C9ppayWMMZTI9iWGcsyX
noZ2A2Ow/r1S8p85FY7/TGYYI9JbkeW/9RkxCxK6l4whl3VlKpXyxpcZ1qse
GyOwam9UNuVcEcmUxm/GELf5ml9EmXb8fm0Erwm6hO47VlEuv28wrrLfBLO1
p261U1ZgG9g262wCua32l4Yo15r7WdxLNgFTg0N0hTKusiYyKkzQvC9CWYyq
T9vY+Qd7+kzQdjD/mw5lM9VdI6NLJuB8ZCV/gnJfcoPo9R2mmJQM5T9P2bnH
jH7U1BSxPCNpTyn/IzEcKxlkigb52CszlEm/4Hsfc01hHSyovZs63+kG7q+5
zaag94dFe1KO4MkTdhw3xc3wOMtCyqz2csabBOmQKp5v+EyZ77ft7bMedHQ5
e1n7UP21zUnCOiWNDk/JC8sPKMu0jv2JvEPHF5VKEXaqPw1yYrWOr9ARO3aj
7DplWw7jYaedZpjTWiPMQvW3h9/GFCtTMyw62Mw7Uo4+WP5KM8cMy+nJ60Sr
CKTfCvRXajKDUli/Vizly5u0hKRHzFD89/fP3ym/mxmpSBM1h8i3pYBmar5m
26Nng7zN0WUR2lJMzefSskfbZKQ5mm/SfXbUEGBXMrxCnDFHTSZ/3A3KfFcF
NN2qzVHxqH2inppvGf/rSSYcFsg+sL+Lu4GAYtlpu1ZhC+o8XnaXUFYb8N+l
I2MBmagBzUMPqf/T03i534pavyrKIoPKFw+RbkFaoQV6RHotDal8OmFW/TWv
ygJparbnWJqofkzMrRFuswDT5oBqPeXoH15H1v+0QEXO8l01Kt+uNC1cmz9g
CQOnQ3R3Kg+7TuxQ7Oq3xHo2kxyrVwTe5PNwGI9boiEgZBRU3g72/Ox7tmKJ
9Nr15+WpPB7XrAuv32mFCq/b81u6CawWMGsqDbSCOU/GuCiV55r1oRZRG6wx
t/NJZ+0gAfHukVdXd1iDne2c3sxHKs9GHE0eq1kj8NnOIqXPBJqFNPTZjlpj
OliP7dEwASP/VRqptdZIe15MZx2hznNXmtR5dxtkXGXw6EwTUMFCyYMQG0SW
OOrVzxDYbEfS+tNt0JCbbK3yh8BAIn2baLUNGLrFQxr/UvP7iV+wcI0tWg55
FAWzkPC7mLNys8oWaQ+n0/LWkTCvWBv1qt0WNfo3zKx4SSg8i/r356AteNJD
X6/lIzE75TKjwG0HQbU2zlOCJCLp28dqnOzgZW65oUqUBJPjVl8zpz2qeH/Z
V0uTKAhovDVg7wCjUV6JUGMS8z8spc+TDmiRtEqNMiVheeJbqWmsA6pOFnMl
m5Fgd9tQ0FjmgIoYPv0CKxLH6e5ZBbMOkDstnzd/mITcLs4Qz2xHOH5OidD0
IfFo0BTjnYcRriIjuzqLhLDjUEPx8GHESpm3k9kkGL3Bqk5/DqOqmTTtvUBC
siNf4dW2I1AKqFhXmUMiufbX9ts+RyDOv6ybVELdJ7LPcweucYLOhlbt+loS
g4Yfuhf0nIHSK6M6X0jwly3963jEGWSj0oTGNxJ67NtodSed8W/XRtqBURK3
Gp0DQnOdYbDUI64zSdVH8ZPAzC9nPD6qtydwkcTmrcPWP3JdkOaf2+W70QfS
oYEEI8wVrxJYj9029MFR4/AJ9043CL27VTNT5wNx7f68T2/dMCXddj630QcD
+/bRnb+4QbeyfL1ekw8sJacqHObdwHzs2VHQ7gPMezPMae6oUl+nG9Tvgy1l
Dr81QtxR7PKMeWnWB3+zqs4Li3nAyKfxer2SL7Tr/rB3+npCSfO0+4YaX6yp
+cwi+tkLekasoRVP/bD7l77vAaY36H/KN4nGMaBWK/JYg7pHhW97/KZO/CQq
DV12tPj5Yq2eYvW1ZyfxkGfDMl8qA0WSZ7vtYv0hUlP6/vbTk4hra2a7pBQA
yYSFk3XCAUjP+nDGZykAzgrcWSnHAsFKKn3Y2xoIvl2mxc35QRgMTPncmhwE
Pw0zP3IqGNv+0lNpcgiG7uUUmcS9oTA4OsSvIhGCZv7oIs6kMNj83kA8WAhB
CGNPkUlvOCY7cj8a9ISicKNANitvJFzTOdVH88MQ0v9Ak+YRBXq8aYpidDia
h868v1cQjanpvyQX6RHQfU1j5eqPwYB2/Nq7WyJR41vHGM6ORXNAnPLnxUik
Cke/DVeIg67Oa/XJV1GQe11wVf9DHATLJ5t97kVjciFfajYxHs5Dw5XR2TEg
jer+d0QiAVc6EjTiFWPxsEzx1NzzBAwa+MpMl8TiuVSbh4l3Iua/yxzn5ovD
L1HVVfHsSeD1NtdVDY/DxFbuhfGbSYgNuW+VPR6HkoPTE7xGyTjrW7A12C4e
CqGaGsenk2FfquyS8CIeEV3XkkLPpaDTM5GTRyUBH678k3VClgmFP4WO54oS
sDEwefFsPxNvBU+J6wslgvukjsvJ4FRc/NHJ6xGfiO5Ip23JEmngXJCkl/9J
xP1/rYsi29Pw/Gml+PiJJFjlHhPb7XUKxG2zXmZfElpN3s6t35AOiMmOmxsn
Y1bc60V5RTreOPre9KlJhtaxTncpo9PQu0gwQmkpcG64aPt+6jTYgoO5Ki+m
QEU54qDemQwYq599LM/ORF+EjjTHuQwM79tMCHEyEdTEzdd8PgPb3w4KLaxm
4q7ZpUHtnAwY3JHwb17DhMyJ+2EapRng2Ri5306ACfH8n5VKDRkYVNu/FCnJ
BDe35xba9wykc57wbwcT1812sw2NZoB5avlghQ4TehemRgomMqD165nQOV0m
Emlx1dt+U/tZP/7oiAETyxpXLUWWM+Drli4+acbElH8/k08wE66ePSKbXJg4
U5vv1yWUidQmv5UFVyZkWY7ZZm7ORH+Hyj+f3JkgT8/Q1ollojfXsqrci4mv
ZfyPuKQzcUY+11XTl/rej7clrTKZ0PyTQ6cxmKApF6Yny2Zi+W2LBpc/E65N
so7sypmwvZMr1h1E7YfrD57uz0Qamz5/dQgTeWaNf8WrZYJrryhnbhgTBy4k
rdfWyMS3j8ILsRFMvBswmVnRyoRDm9avo1FM/B+301ap
      "]], 
     LineBox[CompressedData["
1:eJwVjnk41AkcxidsmXpypkjubOQqR0mGb7kZaVGPECFXWeO+r/EzrphJRCkZ
SrYS1qbcvo7dUo+7lRIJeVqbmJEjNNb+8T7v5/3r8yp40uy9+UgkksNm/u9/
uetUc59Fo03sDpkZbAkpi9YxLRk0JvkBf+HpmtaoHbM+UiWTxqTMnjlN1/bW
2Jb7JIGSBWMSQ+pARuhA648CwvY7mx+S6pVRo3SitUWAu7DAFockTtWtbh63
Vfa4qgWHrQQgoWCnWsuPp4Y65+fYOgBdFUGLEhKY+OH8OaElHRAR1sk0iZfA
6s9Lbeo2utDnXz3DmZJA0TWVXP/Fzd1axwis3Y2v5bL1Jq2OwCH+RItxZ0l0
9j8TM8TVB9L3WVHaM2n0Xf/E32xqBMinQWtzVkDIIXaYhZlCncxYL2dEBUUX
zlbneJ0Cfa+NLmUTXTRqjPolXsQRnLoiVRqGDJEd2vL4vdM5kB8wQLc4Exyz
Gh1YM3eDcaHzlt3pluhtEzPr2esB76eSZBOsT+GJhmWB3sCLkLnWxP2+2x53
1H0kSX/0gXtqTxjuXxxRjWMRaJjuD01DJc/UxJ3QoH4vUvgCAENTpU12uWCV
lbvyX7RAUPS/vPpKzA2bt4vwRDOCoILec9ig6gLurbs/Ut0RDIXxf14poXii
IrEW3CAZCuR3ny1XOF7opk2+luYbBjKNDkWUUm8UVbW911kcDit2G65++r5I
o9jRArgREMcd7+xf8EPTm2nqKZpRsOExs0U07xJ2iiWUbmVEA5hNaXmcC8DI
II1S6t8x0H3awiFGMhBLJMTz+ITjYIKd13a4kYaRw0+NlLzigW1xQ8q9LQg7
J66O/MFOgErx7Kma/GA07VfiExxOBH4vGZq3XwjWBTYETeYlgYT91vlQaihm
SCa8jdGmAzX78vU2hTA81M++YzFKh3KayKg/ORzn14pVllKSgb1/8LHFbDgG
WDc8clUggLNaYareHoHN5TpXVl4S8FLOrMPnQSS+VHnhRfVPAc0cXimTHoUc
6WNbkgUYELWWd73uTDTOypDXvlQwYOK05uARwxgsM/k2K2ydCvmCI6F08VjU
jjKi+H1LBZ/wmmOKP2Ixtu8uIyo3DXT4tmQkvonD0cJP1y5ppUNfAb2w43E8
SoSlrucMp4Nnou1+t/wEJAefdA+OyID84D1jxbREHIg7L5uqkAkVS/XbijSS
sHbVsTSuKxNSHZSnnUqS0OG2r5yazxVYZR16476Tjs+pb1eERLJAs8woKzeZ
jkvyPq8eVmaBmaLNSaF5Ohr79nqqWGfDmcGZDJpLMro1FZwd4WaDa2XZcV5v
MurrxZqYX2UC58O0Ro8hgUOxJw/+lMuEtrtzPz8xIjC8nSzaeZ0JEf2j8oVA
YI3djbETt5hwm+G/x8eUQPVLtdGU+0yIFdMX5tkQKF88V6XbxITL5CRVTRcC
yeSL+5Q+MyEw7/A2VjSBv9mp8U/MMEFSPGZfeCyB5vncf9izTGheZmu7xBOY
okR/JrvABKs9GR4H6ATyKHfs9/KYEPZ7U1drOoHckOF00V0soBbRO+YLCLxa
X0zr282CyY/500M3CdQi+Z5lSbHghXLa9uZbBAZkLyrtlGOB7utlx4xiAqfL
xVoFD7Lg0Rfxbwrlm76vb8ueq7PgGHVNRvABgUp6JVmpWixw5jVafn1I4IV2
LWcBPRYYMV6wGyo3/wguQ8dRFtybE+9hVxNYZNdyINmABeNvjq6n1hBomM8Q
OkFhwbygrtqvTwh89566uGHMgjFbQReHpwT+BxQqjsk=
      "]], 
     LineBox[CompressedData["
1:eJwVkHk01AkAxyfH5loMW5soWdmI2HW0HYav2LFE1pkOR2SkhnHf55zmh5mh
1lHJjDOdFh0UHRSpiDbPEVaeXpeVEWpZu/aP7/u+73uf977f99ULYniEyJBI
JM8V/e/vpUsuVNqcDdWUpETKpCO6KsnCQfLcVt0ntdCFSUei8hRNSzJh2zlk
qHGWTUdKazVJTjJra0oL6rXn0/FPEcv1i1gW9RMejtcL6GiVk87OijXx8bV7
t0E1HRt3GznOiPUhKqUpG/TQsa+//eO02AKvKroTfjUKR8aY3wHVeQvIjExK
8kzCUfdm/p7JXkt0dVt2PzULB3nR8GTYnCX8dSsM9m8Pxx+6eVYTTtuxJ3yk
OM8+HAfDvJP7pTuQqcMf5PmHI3RpUrbFwQYyH86qVBaGA/ks5Z9jHSAdVrBW
VYsAedanLj94H7Ibr5X6KDFgcyvRPU3dC8nKD/0bVSMhjmm9/NL3AMZdc/SM
f4/EqNNI3yLVHwtMoyZFzyiE7E2eCuo5gnVVj/yKlKNh17wg1xNxFKL6vtWH
O6OhfHOcpD1Og0CqWiSfHgPjGccI6+wwmOY456v9EotdTevvUmToUA/zza9W
iMNVpwCDh4wIDIlj9xd3xqFFSX2ZzI9E862QtoEz8Vh/s3q4ri0Kj+MPLh4O
TsB3rMWo5nUxIOlsOT9GSYS/uWIBLzQWPh2Tq33XJoFs5FrZXhYHH+8Sn5bx
JDAobgy6NB6qlbW3O+8kw6GEZ8I2TYRKUDl1pygF7Rrp5V9xkvBE01tlZ0wq
EiK3lbu8SAazVKlR2zMNkjWap2TUUoE+fnPH5nQkDFy30Q9Og5K6VH5SIQPt
r0TDDeJ0xF58oUOMZsChV19GYSADS1z3bVTfTNyMaI6cOJUJ1RD52sSuTPDX
pQ8mm2eh8LLkuaNVFn7oFZ9zHMmCuHq5zrE2Cx8Xywzn2UxMXMjnHtFmgu7c
fPGwHguW7KHhRQ4TLTUWOZ+7WGg+UsFt/8JEl2FnsEsYG2+NapZJNBZmtHeu
YspxECu620B5xsLUBsXFD5c4yHBamq6xZ6PK/tOUmjMXmp9PJMddZcM80YZy
7BMXBqPkpKjNHKQ8q+AknuThdPGGwc58DkZOTxYcN8tGYNLbpxr/cLAmlruU
P5AN8p8pgTlRXChG7QmIiucjTnSjxmuUi75Uv41cPQIFQX65rl48XPvbqzz1
EQFRXOhxy04ePM+G6hrTcpB76VZCsGU2OlwGP6uq52JXScOF+7XZmN9Ee3zh
Si62mXsthnzLh21oT5Chcx5W6ZmRp5l8+N8u8hmW5qF17UPp+QU+dlil2FNF
ApyoyftRcpRAf8qerfInBTB6wBvl0QjE3Vckt/8mQJdLaG7EMQL1bsWjdmdW
cuOLd7vpBEyOX0uiVAsQUBtW3x9DYFPZ9FXL2wI0MazpKiwCiopHdfTfCCAo
keUnSgicdzOWffVOgO+jKR4BFQSohdK34qkVvs5bh1pFgK2fdWPjrAC67E0N
mrUElinnPNYvC0Diar2/UkdAGj2QTf5GCNiFsSfvrPzSVMZ4tlaIB2OMQ0/u
ETAjhfoItYQoTnO3aGgjQM+b0/9aV4jRscrJzA4Cr2s07ihsFUIxkOul07PS
99dgVYeJEBytAHPZXgL6VpJcrpkQBQZk8rs+AoH3zQ7KWQnhEUjqvdG/skdh
AW0/CVG5mVJ/boBAqVvrFuYuIbppHqc4QwSsCzmqdhQhumZsE+gvCQy9dJn7
11aIapH8Ic9RAv8Bt6VjjA==
      "]], LineBox[CompressedData["
1:eJwVjVdUkwcARtMYEaTKcjAqgmlVRsESKQ4CH0Kh7CMirZriQBOwYa+wAiRk
wf8ngDiqVEIUsFgF5ThAwIq0tlQR4iiU4VFqHRjARBBFSe3DPffhPlz7PYkR
+6gUCiX0A/97VPsuxJ896ZVfTLGlFHCRUpPF8Ku+4/2+3XrHQzEXPGMN26p6
xDtHt/ZIB8lFTnsthVat885kxZmLjnHx/rAw9I1yDuJd1AbzL3HRTtPqdEoL
sNQnxi3GuLDd6BDwUknHOuuAa6tY8Qi73zkxrmRA+xO5N3xdAlAmNP4qzQ8k
W0K5Oz8JZrqoxrKYMFzJ3xTc8CwJXld4m/NMI+EbGJrp1JkMZWr7mcFvt6F2
UUSY87kUDAcOqWf8o6Hi9Nqz5KnYF5yt2XN7N7Jag5Sm/DT4tLym3U7Yi/pr
FhR2XDqMLz+k2DxkIz3sG9Zzvww4vQxI8JTGwWaoIkbnlokNzda/MKlcbNeF
cJzMeGgI3PnZb4kJmGyODKGN8tA233TWTJaEWEHU4O6/smB9uXag8XoyMtTq
2LGmbKwQziS3WKZi56eBSr0qB9FuRuUSThpUK02az5G5MHMIPdlZlY78xvDu
8tg8JDLDE7naDHh4Fsunt/Lh94PEuciFB1m4dzDJyEenOV9lIMrCdrfMbXfM
CpCZ9Lkq5F42lh2cymuUFKB6sUUF1SQXZzY22dVMfuh9F73oMXlwHHlhOcgt
ROej0oEmJR/p3TEKx8FC+PXSqYZ9+XhRJsgIDBTgckJL0khFASKibJvqrwog
s+T3Z7sVQhj9Op7uIsSaXuXxgKFCVHNC+cM1QkzMVK2eKhJA83WwPs6mCNyg
ltMseyHmJYhnP5YVoa2OUTLdJcSCCq8tWn0Rulb/HhMSV4QH7xkrxxNEeGmz
/iMBTYQH3r1xrQMiaJYZzbz4WYRbglHqzc1i1Pi+0pgEiSE18rXWXRXDjefF
jH0lhmvZUgnLQ4KcnhMi3gEJTrIcUoZqJRg6+rh8v6sU/pSRWy6LpFicJn5X
1ifF3ZNW+R3FUhglb9qZnCHDGpI8G/9GCnXud7Zi+2JkZ/AZO5JluPA2UpX7
RzEmPJY6WD2RYUslZ7kTuwQMpqZyLLIYN0L6pxeaEojxBdvgZjGm7Nh/1p8l
sJvsOeO+sQTenNt7VgeRKGkwZLufKkF06+GoAS0JlbotNdOWwDr3HF//Ujkk
6xv1PQSB+zmbHOcekGMJ78CVNjmB9A4js86DctRdzMisLyVwPvzIsM8xOX5l
MMeFFQSc91/IYtbKQXXpGv6ykoBd1XjD2lY5+Cv+aas8TcDIaO8n9KdypBlb
5sZ2ETgV7jTn0XM55gTNeGy9ScD/kPaZUiNHuXRY59NNoIheeMlWJ8f5uTXf
26gJzDKPR1jPyjGh/2JHdz8BbUqf1GyRAvtfBW9Y+4xAaXNVYs8SBd66uU7Z
jRJwpXCiFFYKyJLNzy/QEOCSk/QFyxWoG+tzeDJB4N8686uGjgo8frrP6uj0
h99Yf80NZwXSVgXeE78lQHevJsSuCtDYzmWp7wjs6nDdTnNXgD6iNQylkJg1
fI3rHgqcs7/fuZ5K4sfw9lWCDQr47GouWEkj4XlItNCHqUDv8UpPCwMSfw+G
TOq9Fdg1lD+tn0fiPw0COcM=
      "]]}}},
  ImagePadding->{{0., 1.}, {1., 0.}},
  ImageSize->{292.9294730769231, Automatic},
  PlotRange->{{-1.041667, 1.041667}, {-1.04, 1.04}},
  PlotRangePadding->Automatic]], "Input",
 CellChangeTimes->{{3.521476173505137*^9, 3.521476175033736*^9}}],

Cell[BoxData[
 GraphicsBox[{{
    InsetBox["", {-0.07755839488807892, 0.26697598328864025`}, {
     Left, Baseline},
     Alignment->{Left, Top}], 
    GeometricTransformationBox[InsetBox[Cell["Zeeman Energy  E/h (Mhz)",
       GeneratedCell->False,
       CellAutoOverwrite->False,
       CellBaseline->Baseline,
       TextAlignment->Left], {-0.2339003308521741, -0.2715351294765771}, {
      Left, Baseline},
      Alignment->{Left, Top}], {{{{
       6.123233995736764*^-17, -0.9999999999999997}, {0.9999999999999997, 
       6.123233995736764*^-17}}, {-1.0513722899341842`, \
-0.2410230292617206}}}]}, {{}, {}, 
    {Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJwVkHk41HkcxydHJYXR8ThKx6RNiGewu9qGjxqUDCVNkXuYyTSOmSFz/SoN
455fh9AhM4Sytdndkrtv5aHDLtqnUhpPsko1I0wUyqz94/28/ny9nvfamKSg
OD0CgUCb2//8OP7N34c54ZGeqhvQHeMAr1LoQlX+46nvNXTZRsgBgbGGaakc
9Mxc/JhF4XFA3FpFMFBqPXMqijSiWA58L5bSphT6cKbHcWpiBwdaDca1WsVS
uOwYZqYmcsDmFzvfMQUJHgzVe/RWHIaAZ22jnxQuYELnXajtYAOckhp7p1Bh
iDw2u//DISBq6bWnGAGQSxDHKx1Y4NEk2IOZBYMoIY54NS0OFPzW668OhMDN
ZwcZ1aUM6N+pejLjEwFNzuHNvoPRELdLpInpioYlWew7/fpR4NX4xaArMRb2
T9XqWKFhYFw/QLAeYIJ9e7mcrj4A9mO+iVuz4+Fs3jUu2XUfbGmwQhQ9DhSR
O2OCmvbAjZ2Rtu1JiRDpHFqqqvaHlkVms8ScZEDqXavGqN5gVV/VV3ufCyW9
T3iWd7fCOukMt9GCD9YpfZPGCnuIIBudzmKlgIxKs+ExPt4h2tEut5Wlgtp0
8mGIuSNKogQmccaPQMr9iuHsSAqinstyyNgsAG/JdAj7ojdqMz9aPj9TCFW2
/GK3VTSUluxY7v9UBB+v3PwkpQQh5fKlhXqmEohXnTO0u74PpfXWeZAYGNAt
WR2vmSGo7c3Jvj8VR6GSbyMOHghD1B6S3sLeY1Dru+ilrW0Uqk9sTB4sPA7e
IcLOmtlolGNx9IWInA7GItXtgnoGcu5RXPJVpYPsktuUsDgOjc6UbZzMOAF1
JMfv1QksxPFr/DVsrXTuB8tpl/XxqKXaJe/rIymQd0/7P9Sx0aONDxj+8Rkg
+dJV0tzEQWPW7vNOGGTCMR21eiwxEWlWGc2or2XCecPnhiWkZFS5/bPG1E8G
pktlrm91yYgs8KAc+iyD8HVOJg0jXCTursgUnMmCHQ1B/zb+xUOq80On2U7Z
kEdovxB+hY+Wp8i+nerNhqs7XWYzzqYgI+62SO6RHIiysg7v46WiJ5JwG9na
XNCqvzHrYo6gW9PB5ZKHufA6aXMQOSAN7b3IWm3PzIM40Ut3lZ0Adfi/+Gpi
lg8dsuOdiy2EaHIN83HNb/lw10p58PCkEHmyumI2+hXAikhiJ7tbhCKai+l9
4wXgXSl+N9IsRj+7ibf7nJSDCT9KpzwnQc/E2zYZnpGD4+iGNHGpBKXeMyK2
nZUDLUEzEqyUoD8CS/q9LsghlyXqX3BVghzYt4SUKjkYhBW2JNRL0JqyTzdc
m+UwQ30gdn8uQUZGsStJw3IYXuH8tXsZhq4E2uu/+SCH+YWTSTUWGPIpGn+v
0MjBltjyTroSQxmk9Ns2WjnEGvs9/3E9hmYpl4KsZuXwWseou+iCoXFebzZx
GQ5Ph4tTDgVh6GRDWVL3Chy0cRFqLzqGnAgsOm6Jg/ng+ljrUAxxCiZIS1bj
EKj6fe/f0Rh6W21+Z+EmHB71PCa7cud8Iy8qOxxweB9wumZJKoZIbsp8mRMO
CzoPrHsnwFDUPadQAzccfNqHiOePz/Us/AL3f8KBsf1aDj8DQ6WBrT+c2IKD
FPHm0bIxtLUo08SLgoOS4i7ckI+hl6/8J3SeOKBG3agOx9B/t7lYjQ==
      "]], 
     LineBox[CompressedData["
1:eJwVl2k41N0fh4coS9mX+UmMNZUQbTwxH2XfSUIRytZmEtmZyS4xRZQWo4VW
j0qlEqfSos1SpCzPRHu2ZCuV//xfnOucz3Xf33PO9825rqMRFOERLEyj0XoE
4//zt5HfTjYhYxaCpV/k15cWkWfiTKzKXjJpMo2+CqZXmLGSAyFUWR+TVlIe
ob34HjOhrpwmUvaDSasTk41WbGX+KU51/smbAbaGvMOsj++YdSIjP37w5AHd
Yw1ZGd+Zav8ssP3O0wKIbd3bBhrOW/y+PWmuDXZqZ3OIhRCWr24yonVqA2Vt
JxbdEIKLfbSKtKIusGfLAv9yYSSvvzugn60HhJeb+CeIoHu3T2HYrsWgpbzS
TZ+eBZf2huEhngn4ytrOG3ZKIeU/Px+pcRMglS8X1S6Fqs/jd/UdlwIq/JJi
c2nITukVhI8thVHv4mfJIjJ4pb5/WZ/9csissv8774kMfMPXxbePrARXVkFl
noUc9kUO9o7ammJYWnHG9q1yqE3IdJQ/bgoo7rprXiSHeXk3Vd1szcAfiJ4f
3i8H/pV59Y1H/wGDVru/86A8Qn9/mHHHygJctVunpB8r4LBoyvbOIxbgVcdM
xfcr4LEUve3noAUY/Q2TITKKWKjhUL78CBPDDwqCiZciJjTXa3fsAZrrZp6L
7lYEt+KUd2gZUKWT9rT3jyL09Idzx58CvANzyprmKcF7WfaYgoYlmn/d+TF/
oxJu2d5+6P7UEow2zaXNrUrweDZrij9mCfa+qs8rhpTwzc3TkMVYDXaYQqya
pDJUfQeK86JXg/efzf1QS2UkbVcPf6q+BsSpOuRzhTKUvm877uuwBgxRHwcr
oozK6JqWL1FrYDTrtaNahzJ6kt3NxJ6sAbdNy8NpJh04kCppHWWFYTHlBXkb
6XjUo2QhfMwK5KdOaloEHS7651n1963A3VOmIL6XDr9HzW2m8tZgHFY6VXuG
jvcKW8QmzKwh8yAz9dt1OrYHTZhVB1mD/PUMOvuIjvg/83gGV6zB16r98PQT
HUKOl1u/vbEG72Y+y3iCjqzDVqLnhGzAUjJ5qDuTQrHJtq1a7jbgvTI4WaNJ
oTq8Zil9WJDVI3tTvCj8c8MxtE3ZFnyH5xlrgyjcE/nvyEGmLWTajpdW76DQ
Uio6PTvfFm7CGhLqqRS8Bw4veXJd4GvGOOjtp8A309+S2WML9GZ31RVRGGzz
aBQysIPbBfnXBWcpRGt9nKpbZ4fmKtElrVUUfrPiDBKT7BCQeb7+eA2FtLrZ
gaZn7MAaOZU4Xk9BcjavYPyZHapMhgK7HlI46GPy8OqoHYY1P4S7PqegUvFw
kqVqDyNrs3zXlxTKRn0WGVjZg/bu77OuDgp6qwf8vm2zB0O+VG2im8K/+Wzu
2QJ7yPB7U070UljeLX8/+LY9eNaD/a0fKdQtrBjT7BP4DpZBhV8pWMea6fEl
HOAmUdPVO0Dh2YPnvseNHdD8IMenbpiCp3zgfl9fBwx/dW7X/UGhM2C0Xnmv
A7jqI26qYxSCKjNHXp1zAM2h4dGJcQpfplR0DrYIePEO08oJCiz7yvWuPwX1
nB+nHSYpTBZZ5szWcARe3hCPEuSU969qG+0c4XY2NnShIM80DhvKYDmCv8ut
boegPi9lSsPqsCMYo9ekLAT7Kz7P8xQiAm6V6HN0lMIxFc3Muk8C/ri1NH2E
glbYtZsJ0k4IWGTd93uIwvlrdv0rVziBu+m2jpCgP+MZXWrj/k5gHIgLP/iF
wk23CPerGU4wUmdcrvpAASeE01iVTmjmXpje8I7C42+Hri9ud4JbdpR3YRcF
V9MFX77+cQL7lmG9z2sK7Rm1c8/qOIPRPrDiYgsF/1euLsHOzkDS3Ef7nlL4
oNHH1ox2RrMBZ9dkA4XRWvGPxxqcYZT3Tj/uOoUEieN0335ncDtX2O+vpCDs
beSorOAi6C+p2KCcguwPr6oDm13A0Ex4Ty+koOan4ZmZ4wIikvKqIIeC/qNv
E4mXBX62dyaPTcHuKJsZNi3g/F9rI7ZR8BJ17PPTdQW//FnSkgAKmyMUM9c6
u4J3Oz0n3ZNC8przLyyOuoIr6s3q+4dC7qWoyKX3BP5LpY0DBhSOKDOVFn5x
BaNzllu2BoW3Y18qc+a6gSj5x8WIUhhvTB6PDndDs4KwsMFjOv783fx4ONEN
RpImfo036BBZal+yjesGhvBVlYlyOmRPyFsE3nAD+9KDIfE0OvQjz6Y7ibqD
GzwrXsqUjs0qrQpaZe7g2xi0l+YpY6vrjY/Hq92BMzN/h8Yog5V2rIb+2B2k
hBl9f5MykgdDNkoNucOIPXR2qaEySu5Nnfq5ygNVZWJ04UYlNG/VMWnu8AAO
Ks33/ayI16USoo79HuC1nI4JeKKInldD7Q+mPUDbUeM7dUER/Ra34m/rrsVw
ZILx0A5FzJJ3vVcetRYBa2sqWwTvucXtWPckGU+Q0BWTRe3yYLR+eXFCxxMB
nOvclkp5CH3xdSJmAv5ikpufIY8GJXPbGcGecGuL8ShaKg+HSCHz7JueaG4q
vtyaIwevBTl6h4LWgbtg5LkuQxYrMXXmesw68D9uu392WAbU+u1aHbnrEFBS
waoiMuhKc1Gbe2MdjN6GHnTfJIMgvpxCmaQX2Kbvn9QtlkZE8dHpi9VeYPwx
bD3aIwm3ytlJLxq9wK/Ym5PEkoTxg6RfQz1eoD3R/R0hJInxkU1jxuLrwa/W
2Z3FkECii/a3Gr/14P2KKj+wVgxZopfaG2Z6I6Bz53mv/SLg7a671OXtA5qF
8uiZ05PMn4MeCw9tF2QH+ZpK3gTTY+uncme2D9iqImOLjo4zRQJleHUVPkD1
peyMfaPMMJegg7xxHxAVMZkmn2Gm0YKZMVsKfUHbyLFRvdbDrO9xRn/TBtCM
57zIKvpQT/ftrT3dtwHsU890z/39VM9q22PqNyHgVitjr4Z/rdd8Vmr8Qm0j
2EfTtdh2Q/UZN79rV+3YCKgu0QorHK13KTwkHiXpB9I14Jty8299j31365SN
PzCv5No9MQkiV/Hnl+9Gf7BjXkcYP5YgNiJqWrd2+SMg/OXUzixJcqnOf3fs
MX/wVOYUOEnOIYkmfPmx7/7gm2pOW8+RIdS8Ps/BY5vgJnW3xstQniyMjdrG
igtA1UVzLeE7FAl2jB8IagrE5yqpJy6TWoRh2XGc/yYQK6vtCj8Za5Ou5ctd
/N8HgjYkOvf8Dm3ioTlS6fMzEKzB5k8X+rQJfoaz3LSCkBVz0aq0RYeoVvj8
MI8JAmtzu+eia/PJS2HTn3T1zVhZfL17dskiYnlrQqRp5xaE6Zc93PB1CZGs
eUeb+y4E7GdGKq5OZmTRd9udq7LCsSUkrOOP5mpidlOFmAtvR7PnDdl0TVvy
r/0mnYcRO/F+SxjbzsmJ3JGQ+SubzYLSHotRZzl3olJT3ll1fxd+C428575f
SzRTp3bdou+G6kxLDyvx9cTfWPxgZmgUtNff9eEt8SWyC5xPN5RGozcrTddq
iR+JMHeN2D6yB92n/mpbMQOI1ZFM/TSDWFzQV7/c8iKQNMgln5yZHgfhxk91
SWmbSQxr8Umntngops165bI8mJQpyhcKSyciQDV3gfGLEBLTcd1Ca3MSIg65
fIrcF0YaermdV3nJ2E29qy5fvJVYtWgJi3Wk4PQb6eHLjdtIzc5brL5CNope
SxreydlBsunJb+KNObBjeBxNNIwgRi28E7bdHFzK7LYvSGSR4alSvfG0vUiT
Xyr9y28X2e5w68JGjVScK5cebDKKJHcqTPZNPklFyLKekxJKu8kTvcebncLT
UFR4bmFG/27yfa6p0F6RdORN5Pouq48iA/PEp/ovpmPukmXVlqejyZk1owPS
Dhm40mBeuy5+DzGOtTAPG81AYUHXnkdBMSSh+VR6bEEmeJOrl+uuiiXdJR8O
bjXMgqf9oetZsnFEMSrj94GOLERuJd02P+OI+K7Vm3btycbe3AluU0s8aU30
U8vQyEHH89wz12oTyLVfnicTG3Nw4Wmfff6pRLL2WKj6opB9+HXk2jd6QhJ5
5PRmUkomF4d17RRpwclknBHy9HxlLpLbBp/kMFMIM7QpSM9hP0be/zsxIcEm
/rXFXp0j+xHcU1Tvk8ImK5clrLHh5uGB8MoGkX42aU9YvVC0IA+O3pc1vw6w
SfQ9cdmGQ3mI9Qzb2zTEJldcD/dYHhVk/n7rkh9sor/1Wpx5eR4GL1x6azjF
JozSoX+X1uZBX/An2SDBIeLiW1S1PufhouSq0St6HHLWddGM3q95KPp6N+7w
Qg6xKRr5whvIwz/n42nJ+hySpsW5ofYjDxoJqbL2Rhzy1/yEh8rfPPxa9sXy
vxUcMhLZkSWrkA9PsdpOSVsO4d4sjWhWysc2Yhf13Y5DDGmhXvlUPsq1Z0i9
duCQ7fvHtOao5yPl7LTVSRcO+VghVy+2MB+Dp6XurvQSnDf45swj/XzkNEwH
qXlziNaystwMw3wsF1KdKeLLIQH3DH1FluUjLPeVa5Of4D5iE7i/QuCvZI1X
b+KQ46518/ea5WO8dtmJkkAOWVWULmVpno+7j7Vt2Zs55G2X09g0Mx8akubf
g4M55H8d9U/S
      "]], LineBox[CompressedData["
1:eJwV1nc4V+0fB3BZoSEjicr4Vo+k7DLCm2T72rNsKZ2Db/be40uipImMjPIr
GspMJRmlyINUUtFTWSUhHut3nj/Oda7Xdd3Xde7zuT+f93VLuPtZHmVlYWH5
SD3/vcemFk30vGY0p16vzKzEkPAvCVPULfxb612NiuODKBKhaya8NhcOaynJ
htz2iyAR0VjKwl74W0up6LrKWDCJpYsJpvMFbPi6l/aRw5dEI/vU798FAijF
kfrnR0hsU9+l/6uAhubWgb25B0iUay7Wz2lsR1aMW8Q9NRL7dDrlWN5vx1ze
3JeXKiTohkEivBt3wpVBCq5VJhFt92RCJlUKXIkxqyv2kPgQ4JB9/OQeXGHd
bZkqRq3va578WaAILoX4lhIOEjEfnRzWzyriuKp4OSs7idvfZ5/IGCthi9J9
dw9WEnwLUue8Z5SQsX+XvdwKgR6x08rDhvswBzJsbo6Ao7dNeN+UChruKj/Q
mSBwyv/H0LS+KvquFSV9GCPQEJFiLJCniroGT83IUQJbM2q3mOurYQPzKuPZ
NwKf7m591J6jjhp1zCUPETi2+A/bQ11N7BNQOd3aT+ASRwz5/rImssVkwwrf
EGhbL9w7/0MTXyrmXWL6CEhLGJXuu6wFBeklCf0eAn8k7bb3BwPFwfezOLsI
nCm7Zn+sEAhPtGWwdBKQkplMn30BSCm4mC+/JGCvnDojKKGNxQJFUc4OAnX6
9S0WL7Th6sw+faiNgGXH6oVPM9poGBFccmklMGZuLcsQ18HQUzpvdAuBLY4T
FzOCdKAr6WLZ0kwgihTzfiF2EII5m46nPCEg9IvIczQ6CFffys4njwlUBNW8
Hgk8iCMh9noslAejLdS4nh8EJ9sZj9RGAjibsOZQoC6KTG/6ddQTaB0U0mTN
1cUX6RZ5Bcp0mXLGo6e6aLm2PT6njoBTa1evqsAhGBQndYbWEghf2lqw9+4h
rH2xeZdzNYFVxne6x94ewvaEW96fHhBgXtLluLFKD+wPR9W9KF9UJE7QLPRQ
zPx4IfI+gSrvGiXhST2QT5Lleu4RUK82Pta7SR/9B+hcAZSb2D9eztLSh/k6
/8CNlF/nc6yszdRHcN4Uz9G7VD0nLsk/f6APFe13yvyUP6nJeKYM6oOdRWm2
6Q6BH72W7av2GsDksJKKLOUg2teFRhsDfBczqxu9TWCREbY3MsoAi6bN3Tco
JzaudVMtMcCJNy1xJOU1awvOzXYYQKo7uVWBcpaDYsu9aQMEh8gXL1YSEClr
mWNsMYQM7dem55SldCacxghDmJQaPfOjXJkZe+b6OUNUDEiv6FPe90Hg6dF6
Qxj03eyiUW6ULpuRHDbEeNa4KhvlQ6FqUp94jHBXnk39awWBjmcvHfMUjHB1
krOng7K1gNtpR0cjHJBZw1FN+b3r9KNN8UZwdRF/VUzZvSJlqueGEXokrWUv
UB5ZENmR9doIcnvuSJ2izDCssDObN0KxpVZdAuW5C9ppayWMMZTI9iWGcsyX
noZ2A2Ow/r1S8p85FY7/TGYYI9JbkeW/9RkxCxK6l4whl3VlKpXyxpcZ1qse
GyOwam9UNuVcEcmUxm/GELf5ml9EmXb8fm0Erwm6hO47VlEuv28wrrLfBLO1
p261U1ZgG9g262wCua32l4Yo15r7WdxLNgFTg0N0hTKusiYyKkzQvC9CWYyq
T9vY+Qd7+kzQdjD/mw5lM9VdI6NLJuB8ZCV/gnJfcoPo9R2mmJQM5T9P2bnH
jH7U1BSxPCNpTyn/IzEcKxlkigb52CszlEm/4Hsfc01hHSyovZs63+kG7q+5
zaag94dFe1KO4MkTdhw3xc3wOMtCyqz2csabBOmQKp5v+EyZ77ft7bMedHQ5
e1n7UP21zUnCOiWNDk/JC8sPKMu0jv2JvEPHF5VKEXaqPw1yYrWOr9ARO3aj
7DplWw7jYaedZpjTWiPMQvW3h9/GFCtTMyw62Mw7Uo4+WP5KM8cMy+nJ60Sr
CKTfCvRXajKDUli/Vizly5u0hKRHzFD89/fP3ym/mxmpSBM1h8i3pYBmar5m
26Nng7zN0WUR2lJMzefSskfbZKQ5mm/SfXbUEGBXMrxCnDFHTSZ/3A3KfFcF
NN2qzVHxqH2inppvGf/rSSYcFsg+sL+Lu4GAYtlpu1ZhC+o8XnaXUFYb8N+l
I2MBmagBzUMPqf/T03i534pavyrKIoPKFw+RbkFaoQV6RHotDal8OmFW/TWv
ygJparbnWJqofkzMrRFuswDT5oBqPeXoH15H1v+0QEXO8l01Kt+uNC1cmz9g
CQOnQ3R3Kg+7TuxQ7Oq3xHo2kxyrVwTe5PNwGI9boiEgZBRU3g72/Ox7tmKJ
9Nr15+WpPB7XrAuv32mFCq/b81u6CawWMGsqDbSCOU/GuCiV55r1oRZRG6wx
t/NJZ+0gAfHukVdXd1iDne2c3sxHKs9GHE0eq1kj8NnOIqXPBJqFNPTZjlpj
OliP7dEwASP/VRqptdZIe15MZx2hznNXmtR5dxtkXGXw6EwTUMFCyYMQG0SW
OOrVzxDYbEfS+tNt0JCbbK3yh8BAIn2baLUNGLrFQxr/UvP7iV+wcI0tWg55
FAWzkPC7mLNys8oWaQ+n0/LWkTCvWBv1qt0WNfo3zKx4SSg8i/r356AteNJD
X6/lIzE75TKjwG0HQbU2zlOCJCLp28dqnOzgZW65oUqUBJPjVl8zpz2qeH/Z
V0uTKAhovDVg7wCjUV6JUGMS8z8spc+TDmiRtEqNMiVheeJbqWmsA6pOFnMl
m5Fgd9tQ0FjmgIoYPv0CKxLH6e5ZBbMOkDstnzd/mITcLs4Qz2xHOH5OidD0
IfFo0BTjnYcRriIjuzqLhLDjUEPx8GHESpm3k9kkGL3Bqk5/DqOqmTTtvUBC
siNf4dW2I1AKqFhXmUMiufbX9ts+RyDOv6ybVELdJ7LPcweucYLOhlbt+loS
g4Yfuhf0nIHSK6M6X0jwly3963jEGWSj0oTGNxJ67NtodSed8W/XRtqBURK3
Gp0DQnOdYbDUI64zSdVH8ZPAzC9nPD6qtydwkcTmrcPWP3JdkOaf2+W70QfS
oYEEI8wVrxJYj9029MFR4/AJ9043CL27VTNT5wNx7f68T2/dMCXddj630QcD
+/bRnb+4QbeyfL1ekw8sJacqHObdwHzs2VHQ7gPMezPMae6oUl+nG9Tvgy1l
Dr81QtxR7PKMeWnWB3+zqs4Li3nAyKfxer2SL7Tr/rB3+npCSfO0+4YaX6yp
+cwi+tkLekasoRVP/bD7l77vAaY36H/KN4nGMaBWK/JYg7pHhW97/KZO/CQq
DV12tPj5Yq2eYvW1ZyfxkGfDMl8qA0WSZ7vtYv0hUlP6/vbTk4hra2a7pBQA
yYSFk3XCAUjP+nDGZykAzgrcWSnHAsFKKn3Y2xoIvl2mxc35QRgMTPncmhwE
Pw0zP3IqGNv+0lNpcgiG7uUUmcS9oTA4OsSvIhGCZv7oIs6kMNj83kA8WAhB
CGNPkUlvOCY7cj8a9ISicKNANitvJFzTOdVH88MQ0v9Ak+YRBXq8aYpidDia
h868v1cQjanpvyQX6RHQfU1j5eqPwYB2/Nq7WyJR41vHGM6ORXNAnPLnxUik
Cke/DVeIg67Oa/XJV1GQe11wVf9DHATLJ5t97kVjciFfajYxHs5Dw5XR2TEg
jer+d0QiAVc6EjTiFWPxsEzx1NzzBAwa+MpMl8TiuVSbh4l3Iua/yxzn5ovD
L1HVVfHsSeD1NtdVDY/DxFbuhfGbSYgNuW+VPR6HkoPTE7xGyTjrW7A12C4e
CqGaGsenk2FfquyS8CIeEV3XkkLPpaDTM5GTRyUBH678k3VClgmFP4WO54oS
sDEwefFsPxNvBU+J6wslgvukjsvJ4FRc/NHJ6xGfiO5Ip23JEmngXJCkl/9J
xP1/rYsi29Pw/Gml+PiJJFjlHhPb7XUKxG2zXmZfElpN3s6t35AOiMmOmxsn
Y1bc60V5RTreOPre9KlJhtaxTncpo9PQu0gwQmkpcG64aPt+6jTYgoO5Ki+m
QEU54qDemQwYq599LM/ORF+EjjTHuQwM79tMCHEyEdTEzdd8PgPb3w4KLaxm
4q7ZpUHtnAwY3JHwb17DhMyJ+2EapRng2Ri5306ACfH8n5VKDRkYVNu/FCnJ
BDe35xba9wykc57wbwcT1812sw2NZoB5avlghQ4TehemRgomMqD165nQOV0m
Emlx1dt+U/tZP/7oiAETyxpXLUWWM+Drli4+acbElH8/k08wE66ePSKbXJg4
U5vv1yWUidQmv5UFVyZkWY7ZZm7ORH+Hyj+f3JkgT8/Q1ollojfXsqrci4mv
ZfyPuKQzcUY+11XTl/rej7clrTKZ0PyTQ6cxmKApF6Yny2Zi+W2LBpc/E65N
so7sypmwvZMr1h1E7YfrD57uz0Qamz5/dQgTeWaNf8WrZYJrryhnbhgTBy4k
rdfWyMS3j8ILsRFMvBswmVnRyoRDm9avo1FM/B+301ap
      "]], 
     LineBox[CompressedData["
1:eJwVjnk41AkcxidsmXpypkjubOQqR0mGb7kZaVGPECFXWeO+r/EzrphJRCkZ
SrYS1qbcvo7dUo+7lRIJeVqbmJEjNNb+8T7v5/3r8yp40uy9+UgkksNm/u9/
uetUc59Fo03sDpkZbAkpi9YxLRk0JvkBf+HpmtaoHbM+UiWTxqTMnjlN1/bW
2Jb7JIGSBWMSQ+pARuhA648CwvY7mx+S6pVRo3SitUWAu7DAFockTtWtbh63
Vfa4qgWHrQQgoWCnWsuPp4Y65+fYOgBdFUGLEhKY+OH8OaElHRAR1sk0iZfA
6s9Lbeo2utDnXz3DmZJA0TWVXP/Fzd1axwis3Y2v5bL1Jq2OwCH+RItxZ0l0
9j8TM8TVB9L3WVHaM2n0Xf/E32xqBMinQWtzVkDIIXaYhZlCncxYL2dEBUUX
zlbneJ0Cfa+NLmUTXTRqjPolXsQRnLoiVRqGDJEd2vL4vdM5kB8wQLc4Exyz
Gh1YM3eDcaHzlt3pluhtEzPr2esB76eSZBOsT+GJhmWB3sCLkLnWxP2+2x53
1H0kSX/0gXtqTxjuXxxRjWMRaJjuD01DJc/UxJ3QoH4vUvgCAENTpU12uWCV
lbvyX7RAUPS/vPpKzA2bt4vwRDOCoILec9ig6gLurbs/Ut0RDIXxf14poXii
IrEW3CAZCuR3ny1XOF7opk2+luYbBjKNDkWUUm8UVbW911kcDit2G65++r5I
o9jRArgREMcd7+xf8EPTm2nqKZpRsOExs0U07xJ2iiWUbmVEA5hNaXmcC8DI
II1S6t8x0H3awiFGMhBLJMTz+ITjYIKd13a4kYaRw0+NlLzigW1xQ8q9LQg7
J66O/MFOgErx7Kma/GA07VfiExxOBH4vGZq3XwjWBTYETeYlgYT91vlQaihm
SCa8jdGmAzX78vU2hTA81M++YzFKh3KayKg/ORzn14pVllKSgb1/8LHFbDgG
WDc8clUggLNaYareHoHN5TpXVl4S8FLOrMPnQSS+VHnhRfVPAc0cXimTHoUc
6WNbkgUYELWWd73uTDTOypDXvlQwYOK05uARwxgsM/k2K2ydCvmCI6F08VjU
jjKi+H1LBZ/wmmOKP2Ixtu8uIyo3DXT4tmQkvonD0cJP1y5ppUNfAb2w43E8
SoSlrucMp4Nnou1+t/wEJAefdA+OyID84D1jxbREHIg7L5uqkAkVS/XbijSS
sHbVsTSuKxNSHZSnnUqS0OG2r5yazxVYZR16476Tjs+pb1eERLJAs8woKzeZ
jkvyPq8eVmaBmaLNSaF5Ohr79nqqWGfDmcGZDJpLMro1FZwd4WaDa2XZcV5v
MurrxZqYX2UC58O0Ro8hgUOxJw/+lMuEtrtzPz8xIjC8nSzaeZ0JEf2j8oVA
YI3djbETt5hwm+G/x8eUQPVLtdGU+0yIFdMX5tkQKF88V6XbxITL5CRVTRcC
yeSL+5Q+MyEw7/A2VjSBv9mp8U/MMEFSPGZfeCyB5vncf9izTGheZmu7xBOY
okR/JrvABKs9GR4H6ATyKHfs9/KYEPZ7U1drOoHckOF00V0soBbRO+YLCLxa
X0zr282CyY/500M3CdQi+Z5lSbHghXLa9uZbBAZkLyrtlGOB7utlx4xiAqfL
xVoFD7Lg0Rfxbwrlm76vb8ueq7PgGHVNRvABgUp6JVmpWixw5jVafn1I4IV2
LWcBPRYYMV6wGyo3/wguQ8dRFtybE+9hVxNYZNdyINmABeNvjq6n1hBomM8Q
OkFhwbygrtqvTwh89566uGHMgjFbQReHpwT+BxQqjsk=
      "]], 
     LineBox[CompressedData["
1:eJwVkHk01AkAxyfH5loMW5soWdmI2HW0HYav2LFE1pkOR2SkhnHf55zmh5mh
1lHJjDOdFh0UHRSpiDbPEVaeXpeVEWpZu/aP7/u+73uf977f99ULYniEyJBI
JM8V/e/vpUsuVNqcDdWUpETKpCO6KsnCQfLcVt0ntdCFSUei8hRNSzJh2zlk
qHGWTUdKazVJTjJra0oL6rXn0/FPEcv1i1gW9RMejtcL6GiVk87OijXx8bV7
t0E1HRt3GznOiPUhKqUpG/TQsa+//eO02AKvKroTfjUKR8aY3wHVeQvIjExK
8kzCUfdm/p7JXkt0dVt2PzULB3nR8GTYnCX8dSsM9m8Pxx+6eVYTTtuxJ3yk
OM8+HAfDvJP7pTuQqcMf5PmHI3RpUrbFwQYyH86qVBaGA/ks5Z9jHSAdVrBW
VYsAedanLj94H7Ibr5X6KDFgcyvRPU3dC8nKD/0bVSMhjmm9/NL3AMZdc/SM
f4/EqNNI3yLVHwtMoyZFzyiE7E2eCuo5gnVVj/yKlKNh17wg1xNxFKL6vtWH
O6OhfHOcpD1Og0CqWiSfHgPjGccI6+wwmOY456v9EotdTevvUmToUA/zza9W
iMNVpwCDh4wIDIlj9xd3xqFFSX2ZzI9E862QtoEz8Vh/s3q4ri0Kj+MPLh4O
TsB3rMWo5nUxIOlsOT9GSYS/uWIBLzQWPh2Tq33XJoFs5FrZXhYHH+8Sn5bx
JDAobgy6NB6qlbW3O+8kw6GEZ8I2TYRKUDl1pygF7Rrp5V9xkvBE01tlZ0wq
EiK3lbu8SAazVKlR2zMNkjWap2TUUoE+fnPH5nQkDFy30Q9Og5K6VH5SIQPt
r0TDDeJ0xF58oUOMZsChV19GYSADS1z3bVTfTNyMaI6cOJUJ1RD52sSuTPDX
pQ8mm2eh8LLkuaNVFn7oFZ9zHMmCuHq5zrE2Cx8Xywzn2UxMXMjnHtFmgu7c
fPGwHguW7KHhRQ4TLTUWOZ+7WGg+UsFt/8JEl2FnsEsYG2+NapZJNBZmtHeu
YspxECu620B5xsLUBsXFD5c4yHBamq6xZ6PK/tOUmjMXmp9PJMddZcM80YZy
7BMXBqPkpKjNHKQ8q+AknuThdPGGwc58DkZOTxYcN8tGYNLbpxr/cLAmlruU
P5AN8p8pgTlRXChG7QmIiucjTnSjxmuUi75Uv41cPQIFQX65rl48XPvbqzz1
EQFRXOhxy04ePM+G6hrTcpB76VZCsGU2OlwGP6uq52JXScOF+7XZmN9Ee3zh
Si62mXsthnzLh21oT5Chcx5W6ZmRp5l8+N8u8hmW5qF17UPp+QU+dlil2FNF
ApyoyftRcpRAf8qerfInBTB6wBvl0QjE3Vckt/8mQJdLaG7EMQL1bsWjdmdW
cuOLd7vpBEyOX0uiVAsQUBtW3x9DYFPZ9FXL2wI0MazpKiwCiopHdfTfCCAo
keUnSgicdzOWffVOgO+jKR4BFQSohdK34qkVvs5bh1pFgK2fdWPjrAC67E0N
mrUElinnPNYvC0Diar2/UkdAGj2QTf5GCNiFsSfvrPzSVMZ4tlaIB2OMQ0/u
ETAjhfoItYQoTnO3aGgjQM+b0/9aV4jRscrJzA4Cr2s07ihsFUIxkOul07PS
99dgVYeJEBytAHPZXgL6VpJcrpkQBQZk8rs+AoH3zQ7KWQnhEUjqvdG/skdh
AW0/CVG5mVJ/boBAqVvrFuYuIbppHqc4QwSsCzmqdhQhumZsE+gvCQy9dJn7
11aIapH8Ic9RAv8Bt6VjjA==
      "]], LineBox[CompressedData["
1:eJwVjVdUkwcARtMYEaTKcjAqgmlVRsESKQ4CH0Kh7CMirZriQBOwYa+wAiRk
wf8ngDiqVEIUsFgF5ThAwIq0tlQR4iiU4VFqHRjARBBFSe3DPffhPlz7PYkR
+6gUCiX0A/97VPsuxJ896ZVfTLGlFHCRUpPF8Ku+4/2+3XrHQzEXPGMN26p6
xDtHt/ZIB8lFTnsthVat885kxZmLjnHx/rAw9I1yDuJd1AbzL3HRTtPqdEoL
sNQnxi3GuLDd6BDwUknHOuuAa6tY8Qi73zkxrmRA+xO5N3xdAlAmNP4qzQ8k
W0K5Oz8JZrqoxrKYMFzJ3xTc8CwJXld4m/NMI+EbGJrp1JkMZWr7mcFvt6F2
UUSY87kUDAcOqWf8o6Hi9Nqz5KnYF5yt2XN7N7Jag5Sm/DT4tLym3U7Yi/pr
FhR2XDqMLz+k2DxkIz3sG9Zzvww4vQxI8JTGwWaoIkbnlokNzda/MKlcbNeF
cJzMeGgI3PnZb4kJmGyODKGN8tA233TWTJaEWEHU4O6/smB9uXag8XoyMtTq
2LGmbKwQziS3WKZi56eBSr0qB9FuRuUSThpUK02az5G5MHMIPdlZlY78xvDu
8tg8JDLDE7naDHh4Fsunt/Lh94PEuciFB1m4dzDJyEenOV9lIMrCdrfMbXfM
CpCZ9Lkq5F42lh2cymuUFKB6sUUF1SQXZzY22dVMfuh9F73oMXlwHHlhOcgt
ROej0oEmJR/p3TEKx8FC+PXSqYZ9+XhRJsgIDBTgckJL0khFASKibJvqrwog
s+T3Z7sVQhj9Op7uIsSaXuXxgKFCVHNC+cM1QkzMVK2eKhJA83WwPs6mCNyg
ltMseyHmJYhnP5YVoa2OUTLdJcSCCq8tWn0Rulb/HhMSV4QH7xkrxxNEeGmz
/iMBTYQH3r1xrQMiaJYZzbz4WYRbglHqzc1i1Pi+0pgEiSE18rXWXRXDjefF
jH0lhmvZUgnLQ4KcnhMi3gEJTrIcUoZqJRg6+rh8v6sU/pSRWy6LpFicJn5X
1ifF3ZNW+R3FUhglb9qZnCHDGpI8G/9GCnXud7Zi+2JkZ/AZO5JluPA2UpX7
RzEmPJY6WD2RYUslZ7kTuwQMpqZyLLIYN0L6pxeaEojxBdvgZjGm7Nh/1p8l
sJvsOeO+sQTenNt7VgeRKGkwZLufKkF06+GoAS0JlbotNdOWwDr3HF//Ujkk
6xv1PQSB+zmbHOcekGMJ78CVNjmB9A4js86DctRdzMisLyVwPvzIsM8xOX5l
MMeFFQSc91/IYtbKQXXpGv6ykoBd1XjD2lY5+Cv+aas8TcDIaO8n9KdypBlb
5sZ2ETgV7jTn0XM55gTNeGy9ScD/kPaZUiNHuXRY59NNoIheeMlWJ8f5uTXf
26gJzDKPR1jPyjGh/2JHdz8BbUqf1GyRAvtfBW9Y+4xAaXNVYs8SBd66uU7Z
jRJwpXCiFFYKyJLNzy/QEOCSk/QFyxWoG+tzeDJB4N8686uGjgo8frrP6uj0
h99Yf80NZwXSVgXeE78lQHevJsSuCtDYzmWp7wjs6nDdTnNXgD6iNQylkJg1
fI3rHgqcs7/fuZ5K4sfw9lWCDQr47GouWEkj4XlItNCHqUDv8UpPCwMSfw+G
TOq9Fdg1lD+tn0fiPw0COcM=
      "]]}}},
  ImagePadding->{{0., 1.}, {1., 0.}},
  ImageSize->{292.9294730769231, Automatic},
  PlotRange->{{-1.041667, 1.041667}, {-1.04, 1.04}},
  PlotRangePadding->Automatic]], "Output",
 CellChangeTimes->{3.52147907941676*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Plot", "[", 
  RowBox[{
   RowBox[{"spec", "/.", "cond"}], ",", 
   RowBox[{"{", 
    RowBox[{"B", ",", "0", ",", "1000"}], "}"}], ",", 
   RowBox[{"AxesStyle", "\[Rule]", 
    RowBox[{"Arrowheads", "[", "Automatic", "]"}]}]}], "]"}]], "Input",
 CellChangeTimes->{3.521404415393745*^9}],

Cell[BoxData[
 GraphicsBox[{{}, {}, 
   {Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJwVkHk41HkcxydHJYXR8ThKx6RNiGewu9qGjxqUDCVNkXuYyTSOmSFz/SoN
455fh9AhM4Sytdndkrtv5aHDLtqnUhpPsko1I0wUyqz94/28/ny9nvfamKSg
OD0CgUCb2//8OP7N34c54ZGeqhvQHeMAr1LoQlX+46nvNXTZRsgBgbGGaakc
9Mxc/JhF4XFA3FpFMFBqPXMqijSiWA58L5bSphT6cKbHcWpiBwdaDca1WsVS
uOwYZqYmcsDmFzvfMQUJHgzVe/RWHIaAZ22jnxQuYELnXajtYAOckhp7p1Bh
iDw2u//DISBq6bWnGAGQSxDHKx1Y4NEk2IOZBYMoIY54NS0OFPzW668OhMDN
ZwcZ1aUM6N+pejLjEwFNzuHNvoPRELdLpInpioYlWew7/fpR4NX4xaArMRb2
T9XqWKFhYFw/QLAeYIJ9e7mcrj4A9mO+iVuz4+Fs3jUu2XUfbGmwQhQ9DhSR
O2OCmvbAjZ2Rtu1JiRDpHFqqqvaHlkVms8ScZEDqXavGqN5gVV/VV3ufCyW9
T3iWd7fCOukMt9GCD9YpfZPGCnuIIBudzmKlgIxKs+ExPt4h2tEut5Wlgtp0
8mGIuSNKogQmccaPQMr9iuHsSAqinstyyNgsAG/JdAj7ojdqMz9aPj9TCFW2
/GK3VTSUluxY7v9UBB+v3PwkpQQh5fKlhXqmEohXnTO0u74PpfXWeZAYGNAt
WR2vmSGo7c3Jvj8VR6GSbyMOHghD1B6S3sLeY1Dru+ilrW0Uqk9sTB4sPA7e
IcLOmtlolGNx9IWInA7GItXtgnoGcu5RXPJVpYPsktuUsDgOjc6UbZzMOAF1
JMfv1QksxPFr/DVsrXTuB8tpl/XxqKXaJe/rIymQd0/7P9Sx0aONDxj+8Rkg
+dJV0tzEQWPW7vNOGGTCMR21eiwxEWlWGc2or2XCecPnhiWkZFS5/bPG1E8G
pktlrm91yYgs8KAc+iyD8HVOJg0jXCTursgUnMmCHQ1B/zb+xUOq80On2U7Z
kEdovxB+hY+Wp8i+nerNhqs7XWYzzqYgI+62SO6RHIiysg7v46WiJ5JwG9na
XNCqvzHrYo6gW9PB5ZKHufA6aXMQOSAN7b3IWm3PzIM40Ut3lZ0Adfi/+Gpi
lg8dsuOdiy2EaHIN83HNb/lw10p58PCkEHmyumI2+hXAikhiJ7tbhCKai+l9
4wXgXSl+N9IsRj+7ibf7nJSDCT9KpzwnQc/E2zYZnpGD4+iGNHGpBKXeMyK2
nZUDLUEzEqyUoD8CS/q9LsghlyXqX3BVghzYt4SUKjkYhBW2JNRL0JqyTzdc
m+UwQ30gdn8uQUZGsStJw3IYXuH8tXsZhq4E2uu/+SCH+YWTSTUWGPIpGn+v
0MjBltjyTroSQxmk9Ns2WjnEGvs9/3E9hmYpl4KsZuXwWseou+iCoXFebzZx
GQ5Ph4tTDgVh6GRDWVL3Chy0cRFqLzqGnAgsOm6Jg/ng+ljrUAxxCiZIS1bj
EKj6fe/f0Rh6W21+Z+EmHB71PCa7cud8Iy8qOxxweB9wumZJKoZIbsp8mRMO
CzoPrHsnwFDUPadQAzccfNqHiOePz/Us/AL3f8KBsf1aDj8DQ6WBrT+c2IKD
FPHm0bIxtLUo08SLgoOS4i7ckI+hl6/8J3SeOKBG3agOx9B/t7lYjQ==
     "]], 
    LineBox[CompressedData["
1:eJwVl2k41N0fh4coS9mX+UmMNZUQbTwxH2XfSUIRytZmEtmZyS4xRZQWo4VW
j0qlEqfSos1SpCzPRHu2ZCuV//xfnOucz3Xf33PO9825rqMRFOERLEyj0XoE
4//zt5HfTjYhYxaCpV/k15cWkWfiTKzKXjJpMo2+CqZXmLGSAyFUWR+TVlIe
ob34HjOhrpwmUvaDSasTk41WbGX+KU51/smbAbaGvMOsj++YdSIjP37w5AHd
Yw1ZGd+Zav8ssP3O0wKIbd3bBhrOW/y+PWmuDXZqZ3OIhRCWr24yonVqA2Vt
JxbdEIKLfbSKtKIusGfLAv9yYSSvvzugn60HhJeb+CeIoHu3T2HYrsWgpbzS
TZ+eBZf2huEhngn4ytrOG3ZKIeU/Px+pcRMglS8X1S6Fqs/jd/UdlwIq/JJi
c2nITukVhI8thVHv4mfJIjJ4pb5/WZ/9csissv8774kMfMPXxbePrARXVkFl
noUc9kUO9o7ammJYWnHG9q1yqE3IdJQ/bgoo7rprXiSHeXk3Vd1szcAfiJ4f
3i8H/pV59Y1H/wGDVru/86A8Qn9/mHHHygJctVunpB8r4LBoyvbOIxbgVcdM
xfcr4LEUve3noAUY/Q2TITKKWKjhUL78CBPDDwqCiZciJjTXa3fsAZrrZp6L
7lYEt+KUd2gZUKWT9rT3jyL09Idzx58CvANzyprmKcF7WfaYgoYlmn/d+TF/
oxJu2d5+6P7UEow2zaXNrUrweDZrij9mCfa+qs8rhpTwzc3TkMVYDXaYQqya
pDJUfQeK86JXg/efzf1QS2UkbVcPf6q+BsSpOuRzhTKUvm877uuwBgxRHwcr
oozK6JqWL1FrYDTrtaNahzJ6kt3NxJ6sAbdNy8NpJh04kCppHWWFYTHlBXkb
6XjUo2QhfMwK5KdOaloEHS7651n1963A3VOmIL6XDr9HzW2m8tZgHFY6VXuG
jvcKW8QmzKwh8yAz9dt1OrYHTZhVB1mD/PUMOvuIjvg/83gGV6zB16r98PQT
HUKOl1u/vbEG72Y+y3iCjqzDVqLnhGzAUjJ5qDuTQrHJtq1a7jbgvTI4WaNJ
oTq8Zil9WJDVI3tTvCj8c8MxtE3ZFnyH5xlrgyjcE/nvyEGmLWTajpdW76DQ
Uio6PTvfFm7CGhLqqRS8Bw4veXJd4GvGOOjtp8A309+S2WML9GZ31RVRGGzz
aBQysIPbBfnXBWcpRGt9nKpbZ4fmKtElrVUUfrPiDBKT7BCQeb7+eA2FtLrZ
gaZn7MAaOZU4Xk9BcjavYPyZHapMhgK7HlI46GPy8OqoHYY1P4S7PqegUvFw
kqVqDyNrs3zXlxTKRn0WGVjZg/bu77OuDgp6qwf8vm2zB0O+VG2im8K/+Wzu
2QJ7yPB7U070UljeLX8/+LY9eNaD/a0fKdQtrBjT7BP4DpZBhV8pWMea6fEl
HOAmUdPVO0Dh2YPnvseNHdD8IMenbpiCp3zgfl9fBwx/dW7X/UGhM2C0Xnmv
A7jqI26qYxSCKjNHXp1zAM2h4dGJcQpfplR0DrYIePEO08oJCiz7yvWuPwX1
nB+nHSYpTBZZ5szWcARe3hCPEuSU969qG+0c4XY2NnShIM80DhvKYDmCv8ut
boegPi9lSsPqsCMYo9ekLAT7Kz7P8xQiAm6V6HN0lMIxFc3Muk8C/ri1NH2E
glbYtZsJ0k4IWGTd93uIwvlrdv0rVziBu+m2jpCgP+MZXWrj/k5gHIgLP/iF
wk23CPerGU4wUmdcrvpAASeE01iVTmjmXpje8I7C42+Hri9ud4JbdpR3YRcF
V9MFX77+cQL7lmG9z2sK7Rm1c8/qOIPRPrDiYgsF/1euLsHOzkDS3Ef7nlL4
oNHH1ox2RrMBZ9dkA4XRWvGPxxqcYZT3Tj/uOoUEieN0335ncDtX2O+vpCDs
beSorOAi6C+p2KCcguwPr6oDm13A0Ex4Ty+koOan4ZmZ4wIikvKqIIeC/qNv
E4mXBX62dyaPTcHuKJsZNi3g/F9rI7ZR8BJ17PPTdQW//FnSkgAKmyMUM9c6
u4J3Oz0n3ZNC8przLyyOuoIr6s3q+4dC7qWoyKX3BP5LpY0DBhSOKDOVFn5x
BaNzllu2BoW3Y18qc+a6gSj5x8WIUhhvTB6PDndDs4KwsMFjOv783fx4ONEN
RpImfo036BBZal+yjesGhvBVlYlyOmRPyFsE3nAD+9KDIfE0OvQjz6Y7ibqD
GzwrXsqUjs0qrQpaZe7g2xi0l+YpY6vrjY/Hq92BMzN/h8Yog5V2rIb+2B2k
hBl9f5MykgdDNkoNucOIPXR2qaEySu5Nnfq5ygNVZWJ04UYlNG/VMWnu8AAO
Ks33/ayI16USoo79HuC1nI4JeKKInldD7Q+mPUDbUeM7dUER/Ra34m/rrsVw
ZILx0A5FzJJ3vVcetRYBa2sqWwTvucXtWPckGU+Q0BWTRe3yYLR+eXFCxxMB
nOvclkp5CH3xdSJmAv5ikpufIY8GJXPbGcGecGuL8ShaKg+HSCHz7JueaG4q
vtyaIwevBTl6h4LWgbtg5LkuQxYrMXXmesw68D9uu392WAbU+u1aHbnrEFBS
waoiMuhKc1Gbe2MdjN6GHnTfJIMgvpxCmaQX2Kbvn9QtlkZE8dHpi9VeYPwx
bD3aIwm3ytlJLxq9wK/Ym5PEkoTxg6RfQz1eoD3R/R0hJInxkU1jxuLrwa/W
2Z3FkECii/a3Gr/14P2KKj+wVgxZopfaG2Z6I6Bz53mv/SLg7a671OXtA5qF
8uiZ05PMn4MeCw9tF2QH+ZpK3gTTY+uncme2D9iqImOLjo4zRQJleHUVPkD1
peyMfaPMMJegg7xxHxAVMZkmn2Gm0YKZMVsKfUHbyLFRvdbDrO9xRn/TBtCM
57zIKvpQT/ftrT3dtwHsU890z/39VM9q22PqNyHgVitjr4Z/rdd8Vmr8Qm0j
2EfTtdh2Q/UZN79rV+3YCKgu0QorHK13KTwkHiXpB9I14Jty8299j31365SN
PzCv5No9MQkiV/Hnl+9Gf7BjXkcYP5YgNiJqWrd2+SMg/OXUzixJcqnOf3fs
MX/wVOYUOEnOIYkmfPmx7/7gm2pOW8+RIdS8Ps/BY5vgJnW3xstQniyMjdrG
igtA1UVzLeE7FAl2jB8IagrE5yqpJy6TWoRh2XGc/yYQK6vtCj8Za5Ou5ctd
/N8HgjYkOvf8Dm3ioTlS6fMzEKzB5k8X+rQJfoaz3LSCkBVz0aq0RYeoVvj8
MI8JAmtzu+eia/PJS2HTn3T1zVhZfL17dskiYnlrQqRp5xaE6Zc93PB1CZGs
eUeb+y4E7GdGKq5OZmTRd9udq7LCsSUkrOOP5mpidlOFmAtvR7PnDdl0TVvy
r/0mnYcRO/F+SxjbzsmJ3JGQ+SubzYLSHotRZzl3olJT3ll1fxd+C428575f
SzRTp3bdou+G6kxLDyvx9cTfWPxgZmgUtNff9eEt8SWyC5xPN5RGozcrTddq
iR+JMHeN2D6yB92n/mpbMQOI1ZFM/TSDWFzQV7/c8iKQNMgln5yZHgfhxk91
SWmbSQxr8Umntngops165bI8mJQpyhcKSyciQDV3gfGLEBLTcd1Ca3MSIg65
fIrcF0YaermdV3nJ2E29qy5fvJVYtWgJi3Wk4PQb6eHLjdtIzc5brL5CNope
SxreydlBsunJb+KNObBjeBxNNIwgRi28E7bdHFzK7LYvSGSR4alSvfG0vUiT
Xyr9y28X2e5w68JGjVScK5cebDKKJHcqTPZNPklFyLKekxJKu8kTvcebncLT
UFR4bmFG/27yfa6p0F6RdORN5Pouq48iA/PEp/ovpmPukmXVlqejyZk1owPS
Dhm40mBeuy5+DzGOtTAPG81AYUHXnkdBMSSh+VR6bEEmeJOrl+uuiiXdJR8O
bjXMgqf9oetZsnFEMSrj94GOLERuJd02P+OI+K7Vm3btycbe3AluU0s8aU30
U8vQyEHH89wz12oTyLVfnicTG3Nw4Wmfff6pRLL2WKj6opB9+HXk2jd6QhJ5
5PRmUkomF4d17RRpwclknBHy9HxlLpLbBp/kMFMIM7QpSM9hP0be/zsxIcEm
/rXFXp0j+xHcU1Tvk8ImK5clrLHh5uGB8MoGkX42aU9YvVC0IA+O3pc1vw6w
SfQ9cdmGQ3mI9Qzb2zTEJldcD/dYHhVk/n7rkh9sor/1Wpx5eR4GL1x6azjF
JozSoX+X1uZBX/An2SDBIeLiW1S1PufhouSq0St6HHLWddGM3q95KPp6N+7w
Qg6xKRr5whvIwz/n42nJ+hySpsW5ofYjDxoJqbL2Rhzy1/yEh8rfPPxa9sXy
vxUcMhLZkSWrkA9PsdpOSVsO4d4sjWhWysc2Yhf13Y5DDGmhXvlUPsq1Z0i9
duCQ7fvHtOao5yPl7LTVSRcO+VghVy+2MB+Dp6XurvQSnDf45swj/XzkNEwH
qXlziNaystwMw3wsF1KdKeLLIQH3DH1FluUjLPeVa5Of4D5iE7i/QuCvZI1X
b+KQ46518/ea5WO8dtmJkkAOWVWULmVpno+7j7Vt2Zs55G2X09g0Mx8akubf
g4M55H8d9U/S
     "]], LineBox[CompressedData["
1:eJwV1nc4V+0fB3BZoSEjicr4Vo+k7DLCm2T72rNsKZ2Db/be40uipImMjPIr
GspMJRmlyINUUtFTWSUhHut3nj/Oda7Xdd3Xde7zuT+f93VLuPtZHmVlYWH5
SD3/vcemFk30vGY0p16vzKzEkPAvCVPULfxb612NiuODKBKhaya8NhcOaynJ
htz2iyAR0VjKwl74W0up6LrKWDCJpYsJpvMFbPi6l/aRw5dEI/vU798FAijF
kfrnR0hsU9+l/6uAhubWgb25B0iUay7Wz2lsR1aMW8Q9NRL7dDrlWN5vx1ze
3JeXKiTohkEivBt3wpVBCq5VJhFt92RCJlUKXIkxqyv2kPgQ4JB9/OQeXGHd
bZkqRq3va578WaAILoX4lhIOEjEfnRzWzyriuKp4OSs7idvfZ5/IGCthi9J9
dw9WEnwLUue8Z5SQsX+XvdwKgR6x08rDhvswBzJsbo6Ao7dNeN+UChruKj/Q
mSBwyv/H0LS+KvquFSV9GCPQEJFiLJCniroGT83IUQJbM2q3mOurYQPzKuPZ
NwKf7m591J6jjhp1zCUPETi2+A/bQ11N7BNQOd3aT+ASRwz5/rImssVkwwrf
EGhbL9w7/0MTXyrmXWL6CEhLGJXuu6wFBeklCf0eAn8k7bb3BwPFwfezOLsI
nCm7Zn+sEAhPtGWwdBKQkplMn30BSCm4mC+/JGCvnDojKKGNxQJFUc4OAnX6
9S0WL7Th6sw+faiNgGXH6oVPM9poGBFccmklMGZuLcsQ18HQUzpvdAuBLY4T
FzOCdKAr6WLZ0kwgihTzfiF2EII5m46nPCEg9IvIczQ6CFffys4njwlUBNW8
Hgk8iCMh9noslAejLdS4nh8EJ9sZj9RGAjibsOZQoC6KTG/6ddQTaB0U0mTN
1cUX6RZ5Bcp0mXLGo6e6aLm2PT6njoBTa1evqsAhGBQndYbWEghf2lqw9+4h
rH2xeZdzNYFVxne6x94ewvaEW96fHhBgXtLluLFKD+wPR9W9KF9UJE7QLPRQ
zPx4IfI+gSrvGiXhST2QT5Lleu4RUK82Pta7SR/9B+hcAZSb2D9eztLSh/k6
/8CNlF/nc6yszdRHcN4Uz9G7VD0nLsk/f6APFe13yvyUP6nJeKYM6oOdRWm2
6Q6BH72W7av2GsDksJKKLOUg2teFRhsDfBczqxu9TWCREbY3MsoAi6bN3Tco
JzaudVMtMcCJNy1xJOU1awvOzXYYQKo7uVWBcpaDYsu9aQMEh8gXL1YSEClr
mWNsMYQM7dem55SldCacxghDmJQaPfOjXJkZe+b6OUNUDEiv6FPe90Hg6dF6
Qxj03eyiUW6ULpuRHDbEeNa4KhvlQ6FqUp94jHBXnk39awWBjmcvHfMUjHB1
krOng7K1gNtpR0cjHJBZw1FN+b3r9KNN8UZwdRF/VUzZvSJlqueGEXokrWUv
UB5ZENmR9doIcnvuSJ2izDCssDObN0KxpVZdAuW5C9ppayWMMZTI9iWGcsyX
noZ2A2Ow/r1S8p85FY7/TGYYI9JbkeW/9RkxCxK6l4whl3VlKpXyxpcZ1qse
GyOwam9UNuVcEcmUxm/GELf5ml9EmXb8fm0Erwm6hO47VlEuv28wrrLfBLO1
p261U1ZgG9g262wCua32l4Yo15r7WdxLNgFTg0N0hTKusiYyKkzQvC9CWYyq
T9vY+Qd7+kzQdjD/mw5lM9VdI6NLJuB8ZCV/gnJfcoPo9R2mmJQM5T9P2bnH
jH7U1BSxPCNpTyn/IzEcKxlkigb52CszlEm/4Hsfc01hHSyovZs63+kG7q+5
zaag94dFe1KO4MkTdhw3xc3wOMtCyqz2csabBOmQKp5v+EyZ77ft7bMedHQ5
e1n7UP21zUnCOiWNDk/JC8sPKMu0jv2JvEPHF5VKEXaqPw1yYrWOr9ARO3aj
7DplWw7jYaedZpjTWiPMQvW3h9/GFCtTMyw62Mw7Uo4+WP5KM8cMy+nJ60Sr
CKTfCvRXajKDUli/Vizly5u0hKRHzFD89/fP3ym/mxmpSBM1h8i3pYBmar5m
26Nng7zN0WUR2lJMzefSskfbZKQ5mm/SfXbUEGBXMrxCnDFHTSZ/3A3KfFcF
NN2qzVHxqH2inppvGf/rSSYcFsg+sL+Lu4GAYtlpu1ZhC+o8XnaXUFYb8N+l
I2MBmagBzUMPqf/T03i534pavyrKIoPKFw+RbkFaoQV6RHotDal8OmFW/TWv
ygJparbnWJqofkzMrRFuswDT5oBqPeXoH15H1v+0QEXO8l01Kt+uNC1cmz9g
CQOnQ3R3Kg+7TuxQ7Oq3xHo2kxyrVwTe5PNwGI9boiEgZBRU3g72/Ox7tmKJ
9Nr15+WpPB7XrAuv32mFCq/b81u6CawWMGsqDbSCOU/GuCiV55r1oRZRG6wx
t/NJZ+0gAfHukVdXd1iDne2c3sxHKs9GHE0eq1kj8NnOIqXPBJqFNPTZjlpj
OliP7dEwASP/VRqptdZIe15MZx2hznNXmtR5dxtkXGXw6EwTUMFCyYMQG0SW
OOrVzxDYbEfS+tNt0JCbbK3yh8BAIn2baLUNGLrFQxr/UvP7iV+wcI0tWg55
FAWzkPC7mLNys8oWaQ+n0/LWkTCvWBv1qt0WNfo3zKx4SSg8i/r356AteNJD
X6/lIzE75TKjwG0HQbU2zlOCJCLp28dqnOzgZW65oUqUBJPjVl8zpz2qeH/Z
V0uTKAhovDVg7wCjUV6JUGMS8z8spc+TDmiRtEqNMiVheeJbqWmsA6pOFnMl
m5Fgd9tQ0FjmgIoYPv0CKxLH6e5ZBbMOkDstnzd/mITcLs4Qz2xHOH5OidD0
IfFo0BTjnYcRriIjuzqLhLDjUEPx8GHESpm3k9kkGL3Bqk5/DqOqmTTtvUBC
siNf4dW2I1AKqFhXmUMiufbX9ts+RyDOv6ybVELdJ7LPcweucYLOhlbt+loS
g4Yfuhf0nIHSK6M6X0jwly3963jEGWSj0oTGNxJ67NtodSed8W/XRtqBURK3
Gp0DQnOdYbDUI64zSdVH8ZPAzC9nPD6qtydwkcTmrcPWP3JdkOaf2+W70QfS
oYEEI8wVrxJYj9029MFR4/AJ9043CL27VTNT5wNx7f68T2/dMCXddj630QcD
+/bRnb+4QbeyfL1ekw8sJacqHObdwHzs2VHQ7gPMezPMae6oUl+nG9Tvgy1l
Dr81QtxR7PKMeWnWB3+zqs4Li3nAyKfxer2SL7Tr/rB3+npCSfO0+4YaX6yp
+cwi+tkLekasoRVP/bD7l77vAaY36H/KN4nGMaBWK/JYg7pHhW97/KZO/CQq
DV12tPj5Yq2eYvW1ZyfxkGfDMl8qA0WSZ7vtYv0hUlP6/vbTk4hra2a7pBQA
yYSFk3XCAUjP+nDGZykAzgrcWSnHAsFKKn3Y2xoIvl2mxc35QRgMTPncmhwE
Pw0zP3IqGNv+0lNpcgiG7uUUmcS9oTA4OsSvIhGCZv7oIs6kMNj83kA8WAhB
CGNPkUlvOCY7cj8a9ISicKNANitvJFzTOdVH88MQ0v9Ak+YRBXq8aYpidDia
h868v1cQjanpvyQX6RHQfU1j5eqPwYB2/Nq7WyJR41vHGM6ORXNAnPLnxUik
Cke/DVeIg67Oa/XJV1GQe11wVf9DHATLJ5t97kVjciFfajYxHs5Dw5XR2TEg
jer+d0QiAVc6EjTiFWPxsEzx1NzzBAwa+MpMl8TiuVSbh4l3Iua/yxzn5ovD
L1HVVfHsSeD1NtdVDY/DxFbuhfGbSYgNuW+VPR6HkoPTE7xGyTjrW7A12C4e
CqGaGsenk2FfquyS8CIeEV3XkkLPpaDTM5GTRyUBH678k3VClgmFP4WO54oS
sDEwefFsPxNvBU+J6wslgvukjsvJ4FRc/NHJ6xGfiO5Ip23JEmngXJCkl/9J
xP1/rYsi29Pw/Gml+PiJJFjlHhPb7XUKxG2zXmZfElpN3s6t35AOiMmOmxsn
Y1bc60V5RTreOPre9KlJhtaxTncpo9PQu0gwQmkpcG64aPt+6jTYgoO5Ki+m
QEU54qDemQwYq599LM/ORF+EjjTHuQwM79tMCHEyEdTEzdd8PgPb3w4KLaxm
4q7ZpUHtnAwY3JHwb17DhMyJ+2EapRng2Ri5306ACfH8n5VKDRkYVNu/FCnJ
BDe35xba9wykc57wbwcT1812sw2NZoB5avlghQ4TehemRgomMqD165nQOV0m
Emlx1dt+U/tZP/7oiAETyxpXLUWWM+Drli4+acbElH8/k08wE66ePSKbXJg4
U5vv1yWUidQmv5UFVyZkWY7ZZm7ORH+Hyj+f3JkgT8/Q1ollojfXsqrci4mv
ZfyPuKQzcUY+11XTl/rej7clrTKZ0PyTQ6cxmKApF6Yny2Zi+W2LBpc/E65N
so7sypmwvZMr1h1E7YfrD57uz0Qamz5/dQgTeWaNf8WrZYJrryhnbhgTBy4k
rdfWyMS3j8ILsRFMvBswmVnRyoRDm9avo1FM/B+301ap
     "]], LineBox[CompressedData["
1:eJwVjnk41AkcxidsmXpypkjubOQqR0mGb7kZaVGPECFXWeO+r/EzrphJRCkZ
SrYS1qbcvo7dUo+7lRIJeVqbmJEjNNb+8T7v5/3r8yp40uy9+UgkksNm/u9/
uetUc59Fo03sDpkZbAkpi9YxLRk0JvkBf+HpmtaoHbM+UiWTxqTMnjlN1/bW
2Jb7JIGSBWMSQ+pARuhA648CwvY7mx+S6pVRo3SitUWAu7DAFockTtWtbh63
Vfa4qgWHrQQgoWCnWsuPp4Y65+fYOgBdFUGLEhKY+OH8OaElHRAR1sk0iZfA
6s9Lbeo2utDnXz3DmZJA0TWVXP/Fzd1axwis3Y2v5bL1Jq2OwCH+RItxZ0l0
9j8TM8TVB9L3WVHaM2n0Xf/E32xqBMinQWtzVkDIIXaYhZlCncxYL2dEBUUX
zlbneJ0Cfa+NLmUTXTRqjPolXsQRnLoiVRqGDJEd2vL4vdM5kB8wQLc4Exyz
Gh1YM3eDcaHzlt3pluhtEzPr2esB76eSZBOsT+GJhmWB3sCLkLnWxP2+2x53
1H0kSX/0gXtqTxjuXxxRjWMRaJjuD01DJc/UxJ3QoH4vUvgCAENTpU12uWCV
lbvyX7RAUPS/vPpKzA2bt4vwRDOCoILec9ig6gLurbs/Ut0RDIXxf14poXii
IrEW3CAZCuR3ny1XOF7opk2+luYbBjKNDkWUUm8UVbW911kcDit2G65++r5I
o9jRArgREMcd7+xf8EPTm2nqKZpRsOExs0U07xJ2iiWUbmVEA5hNaXmcC8DI
II1S6t8x0H3awiFGMhBLJMTz+ITjYIKd13a4kYaRw0+NlLzigW1xQ8q9LQg7
J66O/MFOgErx7Kma/GA07VfiExxOBH4vGZq3XwjWBTYETeYlgYT91vlQaihm
SCa8jdGmAzX78vU2hTA81M++YzFKh3KayKg/ORzn14pVllKSgb1/8LHFbDgG
WDc8clUggLNaYareHoHN5TpXVl4S8FLOrMPnQSS+VHnhRfVPAc0cXimTHoUc
6WNbkgUYELWWd73uTDTOypDXvlQwYOK05uARwxgsM/k2K2ydCvmCI6F08VjU
jjKi+H1LBZ/wmmOKP2Ixtu8uIyo3DXT4tmQkvonD0cJP1y5ppUNfAb2w43E8
SoSlrucMp4Nnou1+t/wEJAefdA+OyID84D1jxbREHIg7L5uqkAkVS/XbijSS
sHbVsTSuKxNSHZSnnUqS0OG2r5yazxVYZR16476Tjs+pb1eERLJAs8woKzeZ
jkvyPq8eVmaBmaLNSaF5Ohr79nqqWGfDmcGZDJpLMro1FZwd4WaDa2XZcV5v
MurrxZqYX2UC58O0Ro8hgUOxJw/+lMuEtrtzPz8xIjC8nSzaeZ0JEf2j8oVA
YI3djbETt5hwm+G/x8eUQPVLtdGU+0yIFdMX5tkQKF88V6XbxITL5CRVTRcC
yeSL+5Q+MyEw7/A2VjSBv9mp8U/MMEFSPGZfeCyB5vncf9izTGheZmu7xBOY
okR/JrvABKs9GR4H6ATyKHfs9/KYEPZ7U1drOoHckOF00V0soBbRO+YLCLxa
X0zr282CyY/500M3CdQi+Z5lSbHghXLa9uZbBAZkLyrtlGOB7utlx4xiAqfL
xVoFD7Lg0Rfxbwrlm76vb8ueq7PgGHVNRvABgUp6JVmpWixw5jVafn1I4IV2
LWcBPRYYMV6wGyo3/wguQ8dRFtybE+9hVxNYZNdyINmABeNvjq6n1hBomM8Q
OkFhwbygrtqvTwh89566uGHMgjFbQReHpwT+BxQqjsk=
     "]], LineBox[CompressedData["
1:eJwVkHk01AkAxyfH5loMW5soWdmI2HW0HYav2LFE1pkOR2SkhnHf55zmh5mh
1lHJjDOdFh0UHRSpiDbPEVaeXpeVEWpZu/aP7/u+73uf977f99ULYniEyJBI
JM8V/e/vpUsuVNqcDdWUpETKpCO6KsnCQfLcVt0ntdCFSUei8hRNSzJh2zlk
qHGWTUdKazVJTjJra0oL6rXn0/FPEcv1i1gW9RMejtcL6GiVk87OijXx8bV7
t0E1HRt3GznOiPUhKqUpG/TQsa+//eO02AKvKroTfjUKR8aY3wHVeQvIjExK
8kzCUfdm/p7JXkt0dVt2PzULB3nR8GTYnCX8dSsM9m8Pxx+6eVYTTtuxJ3yk
OM8+HAfDvJP7pTuQqcMf5PmHI3RpUrbFwQYyH86qVBaGA/ks5Z9jHSAdVrBW
VYsAedanLj94H7Ibr5X6KDFgcyvRPU3dC8nKD/0bVSMhjmm9/NL3AMZdc/SM
f4/EqNNI3yLVHwtMoyZFzyiE7E2eCuo5gnVVj/yKlKNh17wg1xNxFKL6vtWH
O6OhfHOcpD1Og0CqWiSfHgPjGccI6+wwmOY456v9EotdTevvUmToUA/zza9W
iMNVpwCDh4wIDIlj9xd3xqFFSX2ZzI9E862QtoEz8Vh/s3q4ri0Kj+MPLh4O
TsB3rMWo5nUxIOlsOT9GSYS/uWIBLzQWPh2Tq33XJoFs5FrZXhYHH+8Sn5bx
JDAobgy6NB6qlbW3O+8kw6GEZ8I2TYRKUDl1pygF7Rrp5V9xkvBE01tlZ0wq
EiK3lbu8SAazVKlR2zMNkjWap2TUUoE+fnPH5nQkDFy30Q9Og5K6VH5SIQPt
r0TDDeJ0xF58oUOMZsChV19GYSADS1z3bVTfTNyMaI6cOJUJ1RD52sSuTPDX
pQ8mm2eh8LLkuaNVFn7oFZ9zHMmCuHq5zrE2Cx8Xywzn2UxMXMjnHtFmgu7c
fPGwHguW7KHhRQ4TLTUWOZ+7WGg+UsFt/8JEl2FnsEsYG2+NapZJNBZmtHeu
YspxECu620B5xsLUBsXFD5c4yHBamq6xZ6PK/tOUmjMXmp9PJMddZcM80YZy
7BMXBqPkpKjNHKQ8q+AknuThdPGGwc58DkZOTxYcN8tGYNLbpxr/cLAmlruU
P5AN8p8pgTlRXChG7QmIiucjTnSjxmuUi75Uv41cPQIFQX65rl48XPvbqzz1
EQFRXOhxy04ePM+G6hrTcpB76VZCsGU2OlwGP6uq52JXScOF+7XZmN9Ee3zh
Si62mXsthnzLh21oT5Chcx5W6ZmRp5l8+N8u8hmW5qF17UPp+QU+dlil2FNF
ApyoyftRcpRAf8qerfInBTB6wBvl0QjE3Vckt/8mQJdLaG7EMQL1bsWjdmdW
cuOLd7vpBEyOX0uiVAsQUBtW3x9DYFPZ9FXL2wI0MazpKiwCiopHdfTfCCAo
keUnSgicdzOWffVOgO+jKR4BFQSohdK34qkVvs5bh1pFgK2fdWPjrAC67E0N
mrUElinnPNYvC0Diar2/UkdAGj2QTf5GCNiFsSfvrPzSVMZ4tlaIB2OMQ0/u
ETAjhfoItYQoTnO3aGgjQM+b0/9aV4jRscrJzA4Cr2s07ihsFUIxkOul07PS
99dgVYeJEBytAHPZXgL6VpJcrpkQBQZk8rs+AoH3zQ7KWQnhEUjqvdG/skdh
AW0/CVG5mVJ/boBAqVvrFuYuIbppHqc4QwSsCzmqdhQhumZsE+gvCQy9dJn7
11aIapH8Ic9RAv8Bt6VjjA==
     "]], LineBox[CompressedData["
1:eJwVjVdUkwcARtMYEaTKcjAqgmlVRsESKQ4CH0Kh7CMirZriQBOwYa+wAiRk
wf8ngDiqVEIUsFgF5ThAwIq0tlQR4iiU4VFqHRjARBBFSe3DPffhPlz7PYkR
+6gUCiX0A/97VPsuxJ896ZVfTLGlFHCRUpPF8Ku+4/2+3XrHQzEXPGMN26p6
xDtHt/ZIB8lFTnsthVat885kxZmLjnHx/rAw9I1yDuJd1AbzL3HRTtPqdEoL
sNQnxi3GuLDd6BDwUknHOuuAa6tY8Qi73zkxrmRA+xO5N3xdAlAmNP4qzQ8k
W0K5Oz8JZrqoxrKYMFzJ3xTc8CwJXld4m/NMI+EbGJrp1JkMZWr7mcFvt6F2
UUSY87kUDAcOqWf8o6Hi9Nqz5KnYF5yt2XN7N7Jag5Sm/DT4tLym3U7Yi/pr
FhR2XDqMLz+k2DxkIz3sG9Zzvww4vQxI8JTGwWaoIkbnlokNzda/MKlcbNeF
cJzMeGgI3PnZb4kJmGyODKGN8tA233TWTJaEWEHU4O6/smB9uXag8XoyMtTq
2LGmbKwQziS3WKZi56eBSr0qB9FuRuUSThpUK02az5G5MHMIPdlZlY78xvDu
8tg8JDLDE7naDHh4Fsunt/Lh94PEuciFB1m4dzDJyEenOV9lIMrCdrfMbXfM
CpCZ9Lkq5F42lh2cymuUFKB6sUUF1SQXZzY22dVMfuh9F73oMXlwHHlhOcgt
ROej0oEmJR/p3TEKx8FC+PXSqYZ9+XhRJsgIDBTgckJL0khFASKibJvqrwog
s+T3Z7sVQhj9Op7uIsSaXuXxgKFCVHNC+cM1QkzMVK2eKhJA83WwPs6mCNyg
ltMseyHmJYhnP5YVoa2OUTLdJcSCCq8tWn0Rulb/HhMSV4QH7xkrxxNEeGmz
/iMBTYQH3r1xrQMiaJYZzbz4WYRbglHqzc1i1Pi+0pgEiSE18rXWXRXDjefF
jH0lhmvZUgnLQ4KcnhMi3gEJTrIcUoZqJRg6+rh8v6sU/pSRWy6LpFicJn5X
1ifF3ZNW+R3FUhglb9qZnCHDGpI8G/9GCnXud7Zi+2JkZ/AZO5JluPA2UpX7
RzEmPJY6WD2RYUslZ7kTuwQMpqZyLLIYN0L6pxeaEojxBdvgZjGm7Nh/1p8l
sJvsOeO+sQTenNt7VgeRKGkwZLufKkF06+GoAS0JlbotNdOWwDr3HF//Ujkk
6xv1PQSB+zmbHOcekGMJ78CVNjmB9A4js86DctRdzMisLyVwPvzIsM8xOX5l
MMeFFQSc91/IYtbKQXXpGv6ykoBd1XjD2lY5+Cv+aas8TcDIaO8n9KdypBlb
5sZ2ETgV7jTn0XM55gTNeGy9ScD/kPaZUiNHuXRY59NNoIheeMlWJ8f5uTXf
26gJzDKPR1jPyjGh/2JHdz8BbUqf1GyRAvtfBW9Y+4xAaXNVYs8SBd66uU7Z
jRJwpXCiFFYKyJLNzy/QEOCSk/QFyxWoG+tzeDJB4N8686uGjgo8frrP6uj0
h99Yf80NZwXSVgXeE78lQHevJsSuCtDYzmWp7wjs6nDdTnNXgD6iNQylkJg1
fI3rHgqcs7/fuZ5K4sfw9lWCDQr47GouWEkj4XlItNCHqUDv8UpPCwMSfw+G
TOq9Fdg1lD+tn0fiPw0COcM=
     "]]}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesOrigin->{0, 0},
  AxesStyle->Arrowheads[Automatic],
  ImageSize->{603., Automatic},
  PlotRange->{{0, 1000}, {-630.7907009743465, 928.9999856938775}},
  PlotRangeClipping->True,
  PlotRangePadding->{
    Scaled[0.02], 
    Scaled[0.02]}]], "Output",
 CellChangeTimes->{3.521404416389429*^9, 3.521474968771008*^9, 
  3.521479079569805*^9}]
}, Open  ]]
},
WindowSize->{1338, 1005},
WindowMargins->{{50, Automatic}, {53, Automatic}},
FrontEndVersion->"8.0 for Mac OS X x86 (32-bit, 64-bit Kernel) (November 6, \
2010)",
StyleDefinitions->"Default.nb"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[CellGroupData[{
Cell[579, 22, 1074, 36, 27, "Input"],
Cell[1656, 60, 659, 23, 50, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2352, 88, 132, 2, 27, "Input"],
Cell[2487, 92, 3723, 97, 97, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[6247, 194, 1097, 37, 27, "Input"],
Cell[7347, 233, 657, 23, 50, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[8041, 261, 133, 2, 27, "Input"],
Cell[8177, 265, 3636, 95, 97, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[11850, 365, 414, 10, 27, "Input"],
Cell[12267, 377, 332, 7, 27, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[12636, 389, 3993, 105, 111, "Input"],
Cell[16632, 496, 4140, 117, 84, "Output"]
}, Open  ]],
Cell[20787, 616, 1743, 40, 43, "Input"],
Cell[CellGroupData[{
Cell[22555, 660, 21467, 410, 371, InheritFromParent],
Cell[44025, 1072, 46160, 801, 369, 20407, 377, "CachedBoxData", "BoxData", \
"Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[90222, 1878, 21662, 413, 409, InheritFromParent],
Cell[111887, 2293, 22785, 425, 381, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[134709, 2723, 277, 6, 27, "Input"],
Cell[134989, 2731, 308, 7, 39, "Output"]
}, Open  ]],
Cell[135312, 2741, 1047, 24, 309, "Input"],
Cell[CellGroupData[{
Cell[136384, 2769, 178, 3, 27, "Input"],
Cell[136565, 2774, 17761, 310, 425, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[154363, 3089, 17327, 297, 307, "Input"],
Cell[171693, 3388, 17303, 297, 307, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[189033, 3690, 310, 8, 27, "Input"],
Cell[189346, 3700, 16902, 289, 381, "Output"]
}, Open  ]]
}
]
*)

(* End of internal cache information *)
